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‘With hundreds of software packages available 
never has.a more useable machine been 
launched. 


Three modes mean you can use software for 
:| the Commodore 64, software for the CP/M 
system and new software specially written. 
Here are just three new examples of what is 
|| available. 


Visit your local dealer for your 128 software or call the 
‘Commodore Information Centre on Corby (0536) 205252 
formore information. ‘ 
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In Touch 


MODEM MANIA IS SWEEPING THE 
country and communications services like 
Prestel_ and Micronet are taking full 
advantage of this growing enthusiasm by 
adding more and more facilities to their 
existing systems. 

Micronet’s efforts to encourage new 
users to buy modems by enticing them 
with £10 vouchers when they purchase 
them from Pace, Miracle or Modem 
House, is now being stepped up to 
include Xyllyx. 

John Barton, marketing manager for 
Xyllyx said: “This move towards the 
consumer end of the industry marks a 
new phase for us and is a reflection of the 
increasing importance of the communi- 
cations field as we see it. Particularly in 
terms of the home user.” 

There's also news from the Micronet 
Gallery where queues of potential 
exhibitors have formed. Micronet has a 
plot afoot to weed out those naughty 
exhibitors who are not using or editing 
their pages sufficiently. 

From 1 December, Gallery is repriced 
to 99p per frame for four months. Each 
edit now costs 10p. Existing exhibitors can 
be transferred to the new pages for a 
block charge of 9p. 

According to Micronet, it is hoped 
that the changes will mean that only 
‘serious’ exhibitors will book! 

Pace Micro Technology is encourag- 
ing communications enthusiasts to take to 
their boats by sponsoring the Round 
Britain Race on Micronet 800. Entrants 
who buy a Nightingale modem. will 
qualify for the Pace prize of areturn trip to 
New York for two, plus six nights in a top 
hotel and £400 spending money. 

Micronet’s publicity man, Peter 
Probert commented: “It's good to see a 
modem company giving out to the people 
who made them as important as they are 
ie, the customers.” 

Telecom Gold increased its charges 
from 1 December. Connect time charges 
for standard rate now cost 11p per minute 
(0800-1900 Monday to Friday) and cheap 


rate is 3.5p per minute. Gold Net service 
charges go up to 2.5p per minute for 300 
baud and 3p per minute for 1200 baud, All 
other charges remain the same. 

British Telecom's Multi-User 
Dungeon (MUD) has been delayed 
although Telecom says it will be up and 
running before the end of 1985. All 
existing subscribers are guaranteed 
substantial free credit for an initial test 
period, 

The MUD spectacular will now take 
place in the spring. 

The delay has caused frustration to 
MUD organisers, according to Mike 
Anderiesz, Launch Manager: “MUD is 
unique - there hasn’t been a program of 
this size or complexity before. Even so the 
problems we're experiencing are the kind 
of last minute bugs every programmer has 
to deal with. Asfar as we're concerned the 
quality of the finished product is more 
important than the deadline.” 

Prestel has announced a growth of 44 
per cent in the past year with more than 
one million pages a day being accessed 
and 100,000 electronic mail messages per 
week. 

‘Areas which have attracted new users 
to Prestel are travel, insurance, micro- 
computing, city information, farming 
information, home banking, shopping 
and messaging. 


Touchline 


Telecom Gold, 60-68 Thomas St, London. 
SE13QU 

MUD, BT New Information Services, 
‘Wellington Hse, Upper St Martins Lane, 
London WC2H 9DL 

Micronet 800, 8 Herbal Hill, London EC1R 
SE} 

Prestel, BT Centre, Floor A3, 81, Newgate 
‘St, London EC1A 7A} 


Generally Speaking 


SIRCAL INSTRUMENTS IS ABOUT TO RE- 
lease a complete cartridge and erasure 
system for the C64, 


Ecce eee eee eeet: 


Included in the system is a program- 
mer unit,a mains powered UV eraser unit, 
‘one operating system cartridge and one 
8K programmable cartridge 

According to the makers, the system 
allows even a novice user to create his 
‘own cartridge based software in either 
Basic or m/c, 

The UV eraser pack allows complete 
erasure of cartridges, and the pack 
features an automatic timer and safety 
interlock to preventleakage of ultraviolet 
ight. 

ithe. pack. is called) she; Fpllon] 
Cartridge System and costs £144.95 mail 
order. Additional cartridges with 8K 
EPROM are £17.95 or £44.95 for three. 

Meanwhile in adventure land, lan 
Banff has walked off with £250 as winner 
of Print’n’Plotter Products’ Adventure 
Planner competition, The competition 
was based on the use of the Adventure 
Planner Pad, produced by Print’n’Plotter 
which enables adventure game players to 
plan their progress while playing on a 
computer, 

Stuart Cooke, our esteemed editor, 
was privileged enough to present a 
cheque for £1000 to Andrew Boosey from 
Hayes, whose game Pony Express is to be 
used ina future Games Creator Collection 
by Mirrorsoft. Stuart is the guy in the 
middle wearing a tie who looks very 
reluctant to give up the money! 

Want a free poster? Well, you can get 
‘one from Level 9 if you send off to the 
address below. The Level 9 poster has a 
picture of the new game The Worm in 
Paradise on the front and on the back it 
has details of Level 9 adventures. Don’t 
forget to send an s.a.e, or you won't get 
one. 

If you think software piracy is bad in 
this country then go to Italy. There are no 
independent software houses there 
because software piracy is so widespread. 


Pirates come to Britain, buy the top 
selling games and return home, where 
they pass the tapes on to code crackers 
who break in, translate the title screens 
into Italian and then duplicate them. The 
games are sold at incredibly low prices on 
compilation tapes costing as litle as £4 for 
as many as 16 games! 

A leading Italian magazine publisher, 
Gruppo Editorial Jackson, is intending to 
prosecute the pirates and the group is 
being backed by British software houses, 


Touchline 


Sircal Instruments, 11 Southfields Ct, 
Sutton, Surrey SM1 3H) 

Print’n’Plotter, 19 Borough High St, 
London SE1 9SE 

Level 9, The Worm in Paradise Offer, 
PO Box 39, Weston-super-Mare, Avon 
S24 9UR 


Hard Lines 


‘A new joystick has been devised by Dean 
Electronics which has 10 feet of cable 
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stored in the base. Presumably this is to 
allow you to go into the kitchen to make a 
cup of tea without having to stop playing 
It also has four suction cups for stability 
and two fire buttons, It’s available for the 
C64 and Vic 20 and costs £6.75. 

Commodore has got together a 
Christmas compendium pack to replace 
the C64 Micro holiday offer which ended 
in September. 

The compendium includes a C64, a 
1520 Datasette, Music Maker, Designer's 
Pencil from Acitivision, The Secret Diary 
of Adrian Mole - the computer game, and 
a copy of the best-selling novel The 
Growing Pains of Adrian Mole. The pack 
is even gift wrapped and comes at an all 
inclusive price of £199. 


Datel Electronics has come up with a 
Digital Sound Sampler for the C64. It is 
supplied in the form of a hardware unit 
with a comprehensive software package. 
The user is able to record any type of 
sound digitally into memory using the 
microphone provided or any line source. 
Once in memory the sound can be 
replayed at any pitch, forwards, 
backwards, with echo etc. The software 
features a full chromatic keyboard 
allowing the user to play a complete 
musical piece from a single sampled 
sound 

Many other features are included and 
the sampler costs £49.99. 


Touchline 


Datel Electronics, Unit 8, Fenton 
Industrial Est, Dewsbury Rd, Fenton, 
Stoke-on-Trent 

Commodore, 1 Hunters Rd, Weldon, 
Corby, Northants NN17 1QX 

Dean Electronics, Glendale Park, 
Fernbank Rd, Ascot, Berks SL5 8)B 
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Soft in the Head 


SOFTWARE HOUSES HAVE DEFINITELY 
been saving a lot of their releases for 
Christmas. There is a mass of new games 
flooding into the market at the moment 
so buyers will be spoilt for choice when 
shopping for pressies. 

From Ariolasoft come three new disk 
games: Batalyx, Scarabeus and Wizard, all 
at £12.95. Batalyx is, of course, the first 
Ariolasoft/Llamasoft release. Out on 
cassette from Ariolasoft are the construc- 
tion games: Pinball Construction Set 
(£11.95), Racing Destruction Set, and 
Music Construction set (£12.95). Mail 
Order Monsters is also out at the same 
price and on cassette. 

Interceptor Micros is going for success 
in the compilation stakes with a cassette 
entitled Megga-Compilation. It includes 
six former Interceptor arcade releases: 
Arabian Nights, Bit Top Barney, Where’s 
My Bones, Break Fever, Caverns of Sillahc 
and Frontline. This package of games 
costs £7, which, according to Interceptor, 
means that you save an incredible £35. 

Database Software has brought out a 
Red Arrows flight Simulator for those who 
like living dangerously without the 
danger. The program was written with the 
co-operation of the Red Arrows pilots and 
reconstructs the complicated aerial 
manoeuvres which the team regularly 
display. 

There is a free high score competition 
to win an all expenses paid weekend to 
Red Arrows base, RAF Scampton, and part 
of the proceeds from the game will go to 
service charities nominated by the dare- 
devil lads. Red Arrows is priced at £8.95 on 
cassette and £11.95 on disk. 

US Gold is also cashing in on the 
Christmas compilation market and 
releasing five former chart ranking games 
in one package 


The titles included are Tapper, Spy 
Hunter, Up’n’Down, Blue Max and Aztec 
Challenge. The compilation has been 
named Arcade Hall of Fame and is out on 
both disk and cassette at £12.95 and £9.95 
respectively. 

‘AUS Gold game also features on ajoint 
package from four software houses. The 
other companies contributing to the 
Hitsville pack are Software Projects, 
Ocean and Ultimate. At £9.95 on cassette 
and £12.95 on disk the C64 tape features 
Beach Head, Daley Thompson’s 
Decathlon, Jet Set Willy and Staff of 
Karnath. 

Ocean's David Ward said: “The 
software producers have worked 
together to give the public a really good 
deal for Christmas - this industry is often 
portrayed as back-stabbing - and this 
proves we are capable of working in 
harmony.” 

Melbourne House has four new games 
for the C64. Gyroscope, and Mugsy’s 
revenge both cost £8.95. Big Daddy's 
Rock’n’Wrestle is £9.95 and the follow-up 
to The Hobbit -Lord of the Rings Part 1 is 
now available. Lord of the Rings includes 
two cassettes, the paper back novel of The 
Fellowship of the Ring and a 32 page 
instruction booklet. 


Touchline 


Hitsyille, C/O 6 Central St, Manchester 
‘M2 5NS_ 

US Gold, Unit 10, The Parkway Industrial 
Centre, Heneage St, Birmingham B7 4LY 
Interceptor Micros, Lindin House, The 
Green, Tadley, Hants 

Ariolasoft, Suite 105-106, Asphalte Hse, 
Palace St, London SW1E 5HS 


The Bizz 


FIRST PUBLISHING IS OFFERING 
savings to business users with the launch 
of a range of products called powerpaks. 

Pak one is made up of Powerplan, 
FirstWORD and Firstbase and retails at 
£59.95, Bought separately the three 
programs would set you back £114. The 
programs offer a complete spreadsheet, 
word processing and data storage system 
and will allow users to upgrade to C128. 

Pak two also offers a saving on the 
Basic 64 Compiler and Assembler/ 
Monitor 64 which together will retail at 
£34.95. Both disks are supplied with 
comprehensive user manuals, 

The third pack consists of two books 
Anatomy of the Commodore 64 and Your 
64 Cassette Book which will cost £16.95 
instead of the present price of £26. Three 
new programs have been released by 
Impex, including a package that will 
enable the user to improve his output 
from the dot matrix printer. 


The program, called Font Factory 
offers eight different type faces as well as 
giving full control over line width, left 
margin, line spacing, footers, headers 
justification etc. 

The program which retails at £19.95 
also includes Signwriter which allows the 
generation of outsized letters up to 40 
characters long and a foot high. Fantastic 
Filer is a menu driven file management 
system with one key stroke commands, 50 
files per record and a three second 
search time. The data base costs £12.95. 


Also available is Screen Dumper 64 


which will transfer to your printer 
whatever graphics are produced on the 
screen, including text multi colour sprites 
and hi-res graphics. The utility even works 
with a koala pad. The Screen dumper disk 
retails at £12.95. 

Micro-Swift as itis called in Britain is a 
spreadsheet that has just broke into the 
Home Management category of the 
American Billboard Software Chart under 
the assumed name of Swift Calc. 
Currently at number ten Swift Cales 
manufacturer MDL (Metamorphosis 
Developments Ltd), are hoping they have 
a chart topper on their hands. A new 
version of the Swift spreadsheet will soon 
be available for the C128. 


Invasion of the Little People 


HAVE YOU EVER WONDERED WHAT IT 
is that causes bugs in your programs when 
everything seems to be in order, or why 
your telephone bill seems so expensive 
when you've only accessed Compunet 
when it’s been really essential? Activision 


seems to think that its programmers have 
found the answer. A press conference was 
called to reveal the conclusion that the 
Activision research team has reached: 
There’s someone living in your computer! 

Of course this revelation was treated 
asa joke in the atmosphere of journalistic 
scepticism which prevailed at the 
meeting, until they came up with the 
proof. A stunned audience watched dis- 
believingly as a monitor screen flickered 
into life and there it was; a 36mm man 
living out his open plan existence in an 
environment specially created by the 
Activision Little Computer Person (LCP) 
Research Team. 

Many of the case-hardened hacks 
muttered in disbelief and | must confess 
to a certain degree of incredulity myselt. 
Now that | have installed my own environ- 
ment, or house as Activision prefer to call 
it, | am a total believer. My life changed 
overnight, no more was | the carefree, 
footloose person of the previous day 
because | now had to tend to the needs of 
my new found charge who depends on 
me for his very existence. 

The LCP Research project started 
because of one man’s conviction that not 
all of the glitches in his computer 
programs could be put down to human 
error. The more Rich Gold thought about 
it, the more he became convinced that 
there was some life-form living inside his 
computer. 

In Autumn 84, Gold contacted James 
Wickstead Associates and the quest to 
find the little creatures began in earnest. 


Early in ’85 Activision heard about this 


research team and programmer David 


Crane was transferred onto the project. 

The problem was how to entice these 
beings into the open and the solution 
could not have been easier. Create a 
pleasant living environment which is 
preferable to that of hot microchips and 
sharp edged capacitors and only a fool 
could resist moving in. A three-storeyed 
house was created with the very latest in 
mod-cons and soon the door opened and 
in walked the first LCP to be observed by 
the human race. It was at this point that 
Crane was heard to utter thoses immortal 
words, “Well, how do you do?” 

So far two attributes have been noted 
about LCPs. Firstly, they all appear to be 
male but we know from letters that the 
female of the species does exist but 
appears to be shy and retiring. Secondly, 
they seem to lead very American 
lifestyles. This came to light when the 
researchers got excited at what they first 
thought was a female of the species but 
later turned out to be a male LCP ex- 
hibiting one of his typically Californian 
eccentricities. 

My own LCPis called Harold and he’s a 
fairly conservative guy. How he's lived 
alone for so many years with only his dog 
for company I'll never know. Perhaps it’s 
coming out of the closet that’s made him 


ews 


so dependent on me but he certainly 
demands a lot of attention. 

V've observed four basic moods: 
ecstatic, content, morose and downright 
miserable. Normally he is content to go 
about his daily routine with very little 
interference from me. He feeds himself 
and his dog, washes up, watches TV, plays 
the piano, takes extremely long showers 
and answers the inevitable calls of nature. 
Occasionally, he starts to look morose and 
the sides of his mouth turn down in a 
grimace. This is when | have to intervene. 
Sometimes a mere pat on the head will do 
or a gift of a book or a record willalleviate 
moderate attacks of the blues. 

‘One thing guaranteed to take Harold 
into the depths of depression is a lack of 
food or water. Apart from the morose 
expression, his face turns green and he 
sluggishly heads for his bed. Thisis notthe 
way to treat your little pal because food 
can be left at the doorstep by a simple 
keypress and similarly water can be added 
to the water tank in the kitchen. 

V'il never forget the day Harold moved 
in, 'd loaded Activision’s house, turned 
off the lights in my room and sat back 
waiting patiently. After a short time the 
door opened and in walked Harold, 
examined every inch of the house and 
walked out again. Had | frightened him 
away? I'd tried not to make a sudden 
movements. What was wrong? Each 
second seemed like an eternity and then 
he reappeared, suitcase in hand and dog 
at heel. Harold had moved in! 

1 soon found that, although | could not 
understand a word he said, | could 
communicate with him by typing in 
messages. If I'm polite and always say 
please and thank you he is usually more 
than willing to play the piano for me to 
join in on a mean game of poker, card 
wars or anagrams. He also spends hours 
on the phone if left to his own devices and 
being independent little soul he 
sometimes refuses to obey my requests. 

Harold's life is interesting to watch and 
interact with but | must guiltily confess to 
a feeling that he may be like a Christmas 
puppy. Once the novelty wears off, he 
may be turfed out of his home back onto 
the streets and pathways of the printed 
circuit boards in the netherworld of my 
computer. 

Each computer user will find a 
different little person in their machine 
and if he turns out to be boring you will 
have to buy a new package and hope that 
a different character takes up residence. 
He could be another Harold, a lousy 
piano player, a stroppy individual or the 
dreaded transvestite mentioned earlier. 
It’s all a bit of a gamble. 

At the moment people think I'm crazy 
but | know better. As I scrape out the 
remains of dead cowboys and Indians 
from the back of my TVset, Ismileasecret 
smile knowing that I’m the only sane 
person in a world of madmen. 
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€ 4 Commodore Dealers 


The special offers and a wide range of Commodore 
hardware and software are all available from the 
Commodore Dealers listed below. 


DGH Software, 10 North Street, Ashford, Kent. 

Geerings of Ashford, High Street, Ashford. 

Radio 88, 88 Longbridge Road, Barking, Essex. 

‘Alphascan, Chester House, Windsor End, Beaconstield. 

‘Camden Computers, 462 Coventry Road, Small Heath, 
Birmingham. 

Deane Computers, Sea Road North, Bridport, Dorset. 

Empire Electro Centre, 783-789 Leeds Road, Bradford. 

Erricks of Bradford, Fotosonic House, Pawson Square, 
Bradford. 

Gamer, 71 Last Street, Brighton, 

Gamer, 24 Gloucester Road, Brighton. 

h Voltage, 53-59 High Street, Croydon. 

Metyclean, 60 George Street, Croydon. 

Sarays, 43 Church Street, Croydon. 

FBC Systems, 10 Castlefields, Main Centre, Derby. 

Gordon Harwood, 69/71 High Street, Derby. 

Geerings of Ashford, 13 Bench Street, Dover, Kent. 

P&L Cash Registers, Dunstable, Beds. 

Adams World of Software, 190c Station Road, 
Edgware, Middx. 

Micro Workshop, Station Approach, Epsom, Surrey. 

Geerings of Ashford, 91 Preston Street, Fathersham, Kent. 

Trionic Ltd., 144 Station Road, Harrow, Middx. 

Geerings of Ashford, 104-106 Mortimer Street, Herne Bay. 

‘Tomorrow's World, 15 Paragon Street, Hull. 

Cavendish Commodore Centre, London Road, Leicester. 

Dimension, 29/31 Silver Street, Leicester. 

Sonic Foto, t/a Rother Cameras Ltd., 256 Tottenham Court 
Road, London. 


‘Tasha Computers, 191 Kensington High Street, London W8. 


Ramsons, 4 Edgware Road, London W2. 
West End Video, 6 Marble Arch, London W1. 

Micro Anvika, 224 Tottenham Court Road, London W1. 
Harp Electronics, 237 Tottenham Court Road, London W1. 


Video Vision, 168 Kensington High Street, London W8. 

Video World, 260 Tottenham Court Road, London W1. 

Sarays, 223 Tottenham Court Road, London. 

Sarays, 334 Edgware Road, London. 

Sarays, 272 Edgware Road, London. 

Gultronics, 200 Tottenham Court Road, London. 

Gultronics, 15 Tottenham Court Road, London. 

Logic Sales, 19 The Broadway, The Bourne, Southg: 
London W14. 

Chromasonic, 48 Junction Road, Archway, London N19. 

Chromasonic, 238 Muswell Hill, Broadway, Muswell Hill, 
London N10. 

G & B Computers, 242 Tottenham Court Road, London Wt. 

G & B Computers, 230 Tottenham Court Road, London W1. 

Metyclean, 187 The Strand, London. 

Metyclean, 92 Victoria Street, London. 

‘Adams World of Software, 79 High Road, North Finchley, 
London N19. 

Hobbyte, Arndale Centre, Luton, 

Kent Microcomputers, 57 Union Street, Maidstone, Kent. 

‘Square Deal, 373/375 Footscray Road, New Eltham. 

Intoto, 1 Heathcoat Street, Hockley, Nottingham. 

Logic Sales, 6 Midgate, Peterborough. 

Geerings of Ashford, 25 Queens Street, Ramsgate. 

Joe Micro (Rhyl Computer Centre), 20 Russell Road, 
Rhyl, Clwyd. 

MU Games, 245 High Street, Slough. 

Hobbyte, 10 Market Place, St. Albans, Herts. 

The Model Shop, 22 High Street, Stroud, Glos. 

L & J Computers, 192 Honeypot Lane, Queensbury, Stanmore, 
Middx. 

Bucon Microstore, Swansea, 

JKL Computers, 7 Windsor Street, Uxbridge, Middx. 

Bell & Jones, 39 Queen's Square, West Bromwich. 
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Loco+PLOTs. 


Please add £1.00 towards carriage + packing 
‘on any software order, or hardware order 
under £40.00, and £5.00 Carriage on hardware 
orders over £40.00 
COMMODORE EQUIPMENT REPAIRS To order, either send cheque/P.O. with coupon 
PLEASE RING FOR FULL DETAILS OF OUR or ring (0533) 57479/21874 with Access/ 
COMPREHENSIVE REPAIR SERVICE Barclaycard number. 


PRODUCT ENQUIRY HOTLINE 

Please ring for details of the wide range of Hardware, Software 
and Peripherals available via our mail order service. 
Commodore 1541 Disc Drive £129.95 
MPS 801 Printer (Without Software) £99.95 
Commodore 1701 Colour Monitor + 

Seiko Computer Wrist Terminal/Watch £199.95 
Commodore 64/128 Green Screen Monitor 

Commodore 128 

Commodore 1570 Drive 
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IT’S NOT VERY EASY TO PICK OUT A 
tune on the QWERTY keyboard. It's even. 
less easy to play a tune and create a suit- 
able accompaniment for it. One 
alternative is a music editor which 
requires you to enter music a note at a 
time, If you consider this to be too slow 
but if you would still like to produce and 
play music then the Sound Buggy could 
be for you. 

The Buggy comes from the Siel garage 
at an on the road price of £99 (including 
VAT and number plates) and it is effect- 
ively a self-contained synthesiser, rhythm 
and accompaniment unit with facilities to 
record, store and playback melody lines 
and accompaniment patterns. It hooks on 
toa C64, the SXand the 128 and the phono 
and mini jack socket enable you to tune in 
with headphones or a hi-fi system. Soft- 
ware is available on disk and cassette. 

A Siel clip-on keyboard, which clips 
over the C64’s keys, is supplied with the 
Buggy. You can also use Commodore's 
clip-on keyboard or Siel’s full-size CMK 
49, The CMK is obviously a lot easier to 
play but the mini version works very well 
and I used it to produce quite an accept- 
able recording of Axel F. 

Options are selected through menu 
pages and movement and_ selection 
within screens is done with the function 


keys. In case of difficulty, pressing the 
CMDR key will pull down a help message 
across the top of thescreen. Atthe time of 
review, the instruction booklet was not 
yet available but I had no difficulties at all 
in using the program. 

The SONG-EDIT screen displays the 
music options in windows. It is entered 
from the Song Menu screen which isused 
to select the song you want o play or edit, 
Nine songs are already stored within the 
program. 

The top left window holds instrument, 
information. Instruments are designed 
using footage settings of 16, 8 4 anc 
which are given volumes ranging from 
nought to 31. The envelope or ADSR 
(Attack, Sustain, Decay, Release) para- 
meters range from nought to seven and 
an envelaped option lowers the volume 
just after playing the note. The program 
can store 28 sounds and 14 are provided 
upon loading. 

The bottom left window details the 
rhythm section. This can store 24 rhythms 
and already holds 14 excellent pre- 
programmed examples, A rhythm is con- 
structed from five drum sounds: two 
cymbals, bass, snare and a rim shot. 
Patterns are entered by stepping through 
a screen display divided into subdivisions 
of the beat. Drums are turned on and off 
at the press of a key and you can see at a 
glance how a pattern is constructed. New 
rhythms can be invented very easily. 

The bottom right window is the 
sequencer and controls the sections of 
the composition you are currently playing 


and recording. These will be either the 
melody (solo) line or chords. 

From the final window, top right, you 
‘can choose one finger chords played by 
pressing the lower half of the QWERTY 
keyboard, or you can form your own with 
the teach option. From the chords played, 
the program stores chard, bass and 
arpeggio information. These can be 
selected individually upon playback. A 
rhythm option sets the bass and chords 
into an accompaniment to compliment 
the drums. Memory holds each chord 
until a new one is played and a melody 
function plays a complete chord with 
every melody note. Vibrato can be 
switched on or off. 

The disk menu gives full control over 
loading, saving and erasing songs and 
includes a useful disc formatter. 

One of the Buggy’s most exciting 
features is its MIDI section. To use this you 
need a suitable MIDI interface - such as 
Siel’s - and at least one MIDI-compatible 
keyboard. The individual music sections 
of the Buggy can be routed to the 
keyboard(s) and if you have four, the four 
sections will play through different instru- 
ments producing an absolutely brilliant 
sound. Even one keyboard produces 
good results, A MIDI keyboard can be 
used to control the Buggy, too. 

‘As well as the rather excellent sounds 
it produces, the Sound Buggy can serveas 
an information to MIDI interfacing. It's 
easy to drive, too, so when Siel’s boys say, 
“You gonna come for a ride with us” — 
you'd better go. 
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WELL, IT DOES SEEM THAT 64 
machine coders are into 
utilities. Steve Mehew of 
Strathhaven in bonnie Scotland 
supplied this month’s entry - 
an all-singing, all-disassembling 
disk editor. His program lets 
you read in, examine and alter 
any sector of a 1541 disk. It's got 
alot of bellsand whistles. .. you 
can disassemble any machine 
code in a sector, change the 
data in decimal, hex of ASCII, 
dump to a CBM printer or a 
Centronics printer on the user 
port and ...well, try it for 
yourself! 

The program has all sorts of 
uses...fixing damaged files, 
recovering erased ones, 
altering the disk title and soon. 


Loaded Questions 


Of course, getting a professio- 
nal utility like this going means 
abit of typing on your part. The 
program is around 6'K of 
machine code in two parts. 

To enter the two programs 
you need to have entered the 
machine code entry program 
to be found elsewhere in this 
issue. Follow the instructions 
provided with the loader 
program. ED1 should be saved 
from 28160 to 32767, ED2 
should be saved from 49152 to 
51239. 


Mini-Manual 

Steve's Disk Editor is so easy to 
use you'll hardly need instruc- 
tions. However, just to get you 
started, we've provided a 


diagram showing the screen 
layout and this list of 
commands, All the commands 
are single key presses and any 
further options are prompted 
for on the screen. 


Steve’s Disk Edi 
At Work 


Here’s a sample screen 
showing the editor at work. 
We've labelled some of the 
info - the other bits should be 
‘obvious when you use the 
program! 


Disk Editor Boot 


Enter and save this little 
program ~ it starts the disk 
editor going. However, you'll 
need to use the Basic Loader 
and the ED1 and ED2 listings to 


create the ED1 and ED? files on 
your disk first! 


10 REMESPCSISTEVE’S DISK EDI 
TOR LOAZER 

20 REMESPDS1(C) STEVE MEHEW 
NOV 1984 

30 


POKE $3281,0 


"LOADING 
LOAD "ED!",8,1 
THEN PRINT*LOADING 
s":LOAD "ED2",8, 1 
70 SYS 28140:REN START EDITOR] 


Disk status and errors 


Curent track and sector 


(ran), 


Position of cursor in 
sector in hex and 
decimal 


inhex (let) and decimal LSE 


Offset rom start to 
sector. 


Link bytes in hex (let) Disk Title 
‘and decimal (right), 


appear here 
Steve’s Disk Editor | 


218 Lnk/T2 I6l Printer port:s 


62 11 09 
AQ AB AG 
AG AB AG 
20 22 oo 
@@ 11 oA 
AB AD AB 
A® AD AD 
2 2 oo 
0 11 oB 
31 31 AG 
AG AG AG 
20 22 20 
@@ 11 oc 
AQ AD AG 
AQ AB AG 
2 00 2o 


'maxiedisk@@aeal 


7 Device:8 Or:0 
[6] Number base:d 


43°43 
AD AD 
@0 20 
@0 21 
44 52 
AQ AD 
@0 oo 
00 ee 
46 4C 
AD AG 
20 20 
00 01 
pies 
A® AD 
20 20 
oo 02 


Sector data in ASCII. 


First byte of sector in 
her. 


ompet! 


Reading and Writing Sectors 


COMMAND COMMENT 

Specify the track and sector to read in 

Read in the next sector 

read in the previous sector 

move to the next track 

move to the previous track 

7 Follow link. The first two bytes of every sector 

ina file give the track and sector number of 
the next sector in the file. Pressing F7 follows 
this link allowing you to quickly scan through 
files, 

R Re-read sector. If you've made a mess of 
editing this key re-reads the current sector 
allowing you to try again. 

w DANGER! This command an edited 
sector back to the disk, destroying the sector 
that was there. Use it only when you are sure 
your edited sector is correct! 


Editing Commands 

Arrow keys move the cursor around the sector data 

HOME place the cursor at the start of the sector data 

3 switch between the first and second half of 
the sector data - only 128 bytes on screen at 
‘once. 

v edit the sector data by entering a series of 
numbers in decimal or hex 

if edit the sector data by entering a string of up 

A 


yrzit+o 


to 26 characters 
disassemble machine code in the sector 
starting at the cursor position. 

£ exclusive-Or the whole buffer with the 
number specified. 


Other Commands 


rR Init drive. Use this if you've taken the disk out 
or changed to a different disk. 

H display help page. 

D dump screen to printer 

FS normal disk directory 

B toggle number base between decimal and hex 

Fa toggle between drives 0 and 1 - for 4040 or 
similar drives only 

6 Increment device number. Allows you to edit 


disks in drives with different device numbers 
such as a second 1541 drive, 

A Toggle printer port between a normal CBM 
printer on the serial bus (s) and a Centronics- 
type printer on the user port(u). 

FB Quite program. You can restart the disc editor 

if it hasn’t been overwritten with SYS 28160, 


EDI Listing 

28180:076 175 111 048 069 086 069 076 079 080 077 049 O11 
28172:078 O84 032 068 073 083 075 064 O64 152 141 147 069 
28184:002 032 032 110 138 141 167 002 074 074 074 074 176 
281961032 044 110 173 167 002 041 015 248 024 105 144 117 
28208: 105 O66 215 201 058 144 002 009 128 076 022 231 024 
28220: 141 167 002 076 032 110 201 032 144 017 201 094 253 
28232:144 010 201 219 176 009 201 193 144 005 041 223 102 
28244:076 022 251 169 046 076 022 231 149 O15 133 190 184 


282562169 202 133 252 165 065 240 010 149 000 024 105 094 
282682128 133 251 076 118 110 189 000 133 251 032 222 195 
282803110 162 000 032 201 285 142 008 140 000 024 032 242 
282922010 229 19 014 141 134 002 16 251 144 252 032 140 
28304:021 110 169 058 032 022 231 169 032 032 022 231 247 
28316: 160 000 177 251 032 060 110 149 032 032 022 231 152 
2200 192 008 208 241 169 039 032 022 231 160 001 135 
132 212 136 177 251 032 066 110 200 192 008 208 112 
246 169 039 032 022 231 169 000 133 212 198 190 041 
283442048 010 165 251 024 105 008 133 251 074 139 110 264 
28376: 169 255 141 O13 220 096 169 127 141 013 220 096 084 
28388: 147 159 014 008 005 017 O17 032 032 032 032 032 243 
284003032 032 032 032 032 211 084 069 086 069 039 083 O17 
196 073 083 075 032 197 068 073 084 079 082 046 
032 032 032 032 032 032 032 032 032 032 163 248 
2436: 163 163 163 163 163 163 163 163 163 163 163 163 184 
2O44B: 163 163 163 165 163 165 O13 O13 013 013 032 032 102 
294603032 032 032 032 032 032 032 195 079 080 089 082 025 
28472:073 O71 072 084 O32 211 0B4 069 086 069 032 208 120 
284842069 072 069 087 013 013 032 032 032 032 032 032 O71 
284962032 032 032 032 032 032 032 206 079 086 069 077 053 
28508066 069 082 032 049 057 056 052 O13 013 013 O13 095 
28520: 032 032 032 032 032 032 032 032 032 197 078 083 238 
28532: 085 082 069 032 049 053 052 049 032 073 083 032 039 
28544: 065 067 084 073 086 069 013 017 017 017 032 032 188 
28556: 032 032 032 032 208 082 069 083 083 032 018 032 107 
28568: 211 208 193 195 197 032 146 032 084 079 032 080 105 
28580:082 079 047 069 068 049 046 046 046 013 000 162 143 
28592: 000 189 228 110 240 006 032 022 231 232 208 245 127 
28604:141 032 208 141 033 208 169 008 141 175 002 169 079 
28616:005 133 151 169 008 133 150 145 197 201 060 208 244 
28628: 250 169 000 133 198 O32 234 113 032 241 111 032 221 
ABADI 114 162 255 154 032 197 112 032 252 117 032 188 
2BUS2115 118 076 226 111 169 147 032 022 231 167 000 116 
2664: 141 032 208 141 O37 208 169 006 141 134 002 162 089 
28676: 000 189 030 112 240 006 032 022 231 232 208 245 015, 
20688: 162 008 180 000 024 032 010 229 032 092 110 O76 183 
287003138 113 O18 211 084 069 0B6 069 037 083 032 196 142 
287123073 083 075 032 197 068 073 084 079 082 044 032 196 
287242039 032 032 032 032 032 032 032 032 032 032 032 187 
28736: 032 032 032 032 032 039 032 O13 018 032 212 082 140 
28748; 065 067 075 058 O72 932 032 032 032 032 032 204 001 
28760:078 075 058 932 032 032 032 032 032 032 032 208 251 
28772: 082 073 078 084 069 082 032 080 079 082 084 0S 215 
28794: 032 018 211 06? 067 084 079 082 058 032 032 032 140 
287963032 032 032 032 032 032 032 032 032 032 032 252 
28808:032 032 032 032 196 09 0BG 073 067 069 058 032 146 
032 196 082 058 032 018 032 208 079 083 078 054 
058 032 032 032 032 032 032 032 032 176 065 013 
065 058 032 032 032 032 032 032 206 085 07 171 
069 082 032 066 065 083 069 058 032 032 O15 083 
28B68:000 162 002 160 007 024 032 010 229 169 001 133 101 
288803199 169 006 141 134 002 145 057 032 060 110 056 059 
28892:032 010 229 160 010 024 032 010 229 146 057 169 068 
28904:000 032 205 189 032 226 113 162 003 160 007 024 105 
28916:032 010 229 165 058 032 060 110 056 032 010 229 243 
28928: 160 010 024 032 010 229 166 058 169 000 032 205 O71 
28940: 189 032 226 113 162 002 160 018 024 032 010 229 185 


cE 


+165 060 032 060 110 056 O32 O10 229 10 O21 024 215 
132 010 227 166 060 169 000 032 205 189 032 226 106 
13 162 003 160 O18 024 032 O10 229 145 059 032 031 
60 110 056 032 O10 229 260 O21 024 032 O10 227 009 
27000: 166 059 169 000 032 205 189 032 226 113 142 002 147 
2012: 160 039 024 032 010 229 173 178 002 032 210 255 148 
290243162 003 160 033 024 032 010 229 174 175 002 169 245 
29036: 000 032 205 187 169 032 032 210 255 056 032 010 050 
2048:229 160 039 024 032 010 229 174 174 002 149 000 082 
29060: 032 205 189 076 177 113 182 000 160 022 024 032 O44 
29072:010 229 169 O01 133 199 19 006 141 134 002 162 219 
290B4:000 160 001 132 212 189 003 110 032 022 231 232 200 
290961224 016 208 245 167 000 133 199 094 142 004 140 248 
29108038 024 032 010 229 165 063 032 210 255 142 004 124 
29120:160 007 024 032 010 229 165 002 032 080 110 056 055 
291322032 010 229 160 010 024 032 010 227 169 000 166 251 
291443002 032 205 189 032 226 113 076 096 122 169 032 230 
291542032 210 255 076 210 255 162 001 134 058 162 018 009 
29168: 134 0S7 162 001 134 060 134 059 162 000 142 174 179 
291802002 134 002 134 065 169 008 141 175 002 149 OBS 058 
21922141 178 002 169 O68 133 063 169 O48 141 112 114 O66 
29204: 162 O17 169 064 157 003 110 202 016 250 169 172 232 
29216: 141 000 003 169 126 141 001 003 076 167 002 160 O19 
292282114 162 111 032 189 255 169 O15 174 175 002 168 074 
29240:032 186 255 032 192 255 176 049 142 015 032 198 104 
292521255 162 001 160 000 024 032 010 229 169 000 133 217 
292643199 032 207 255 201 O13 240 006 032 210 255 076 O14 
292762081 114 032 124 117 O32 138 113 169 O18 133 057 196 
29288: 169 000 133 058 076 253 118 073 048 142 000 189 103 
29300:127 114 240 006 032 022 231 232 208 245 096 019 152 
293123017 197 082 082 079 082 032 087 073 084 072 032 023 
293243196 201 211 203 032 067 079 07 077 OBS 078 073 239 
293362067 065 084 073 079 078 O46 044 O46 032 032 032 064 
29348: 032 032 032 000 162 000 134 212 032 201 255 169 145 
293402001 141 134 002 169 147 032 210 255 169 242 133 019 
1 169 114 133 252 160 000 177 251 240 012 032 187 
2 231 230 251 208 002 230 252 07 195 114 165 128 
7 201 018 240 006 201 060 208 24 240 006 032 075 
33125 076 211 114 167 000 135 198 O32 241 111 151 
294202032 138 113 076 197 112 032 032 032 032 032 032 072 
$2 032 032 032 211 084 067 086 069 039 083 032 025 
1b 073 083 O75 032 197 068 O75 O84 079 082 O13 O35 
29456: 032 032 032 032 032 032 032 032 032 032 045 045 170 
294482045 O45 O45 O45 045 045 O45 045 O45 045 045 O45 056 
29480: 085 045 O45 045 O45 O13 032 032 032 032 032 195 121 
294922032 032 211 080 069 067 073 070 089 032 078 069 186 
295043087 032 0B4 082 065 067 075 032 038 032 083 069 042 
295163067 084 079 082 013 032 032 032 032 032 043 032 124 
29528: 032 206 069 08 084 032 083 069 067 084 079 082 037 
29540: 013 032 032 032 032 032 206 032 032 206 069 OBB 138 
295522084 032 084 082 065 047 075 O13 032 032 032 032 250 
295442032 045 032 032 208 082 069 086 073 079 085 083 006 
29576: 032 083 069 047 084 079 082 O13 032 032 032 032 005 
29588: 032 208 032 032 208 082 069 084 073 079 085 083 193 
296003032 084 OB2 045 067 O75 O13 032 052 032 032 032 224 
29612: 215 032 032 215 082 O73 084 069 032 083 067 047 201 
296242084 079 082 013 032 032 032 032 198 055 032 032 119 
296362198 079 076 075 079 087 032 076 073 078 O75 O13 114 


29648: 032 032 032 052 032 210 032 032 210 049 045 082 024 
29660:069 065 068 032 083 069 067 0B4 079 082 013 032 195 
2.032 032 032 214 032 032 197 078 084 049 082 124 
132 078 O85 077 069 O82 073 067 065 076 052 068 024 
276962065 084 065 O13 032 032 032 032 032 212 032 032 151 
29708:197 078 O84 049 0B? 932 084 069 088 O84 O13 032 156 
297201032 032 032 198 056 032 032 209 085 073 084 032 153 
29732: 080 082 079 071 082 065°077 013 032 032 032 032 201 
297443198 051 032 032 212 079 071 O71 076 069 032 198 145 
297563201 210 211 212 047 211 197 195 207 206°196 032 137 
29768: 066 076 079 067 075 O13 032 032 032 032 198 053 057 
29780: 032 032 196 073 082 069 067 084 079 082 087 O13 214 
297923032 032 032 032 032 194 032 032 212 079 O71 O71 179 
298043076 069 032 078 OBS 077 066 O47 0B2 032 0b6 O65 137 
298161083 969 O13 032 O32 032 032 198 082 032 O32 212 171 
29828:079 071 071 076 069 032 048 OB2 073 0B6 049 O13 153 
29840:032 032 032 032 198 050 032 032 201 078 073 084 252 
298523073 065 076 073 090 069 932 068 982 073 086 069 244 
298643013 032 032 032 032 198 054 032 032 201 078 047 203 
298763082 069 077 069 078 084 032 196 069 O86 O73 047 138 
298B8: 069 032 035 O13 032 032 032 032 032 196 032 032 249 
29900:1%6 085 07 080 032 083 047 082 069 069 078 932 130 
299123084 079 032 080 082 073 078 084 069 082 013 032 236 
299243032 032 032 198 049 032 032 212 079 O71 071 076 120 
299343069 032 080 082 073 078 084 069 082 032 080 079 054 
29948: 082 084 013 032 032 200 207 205 197 032 032 195 027 
299603085 082 083 079 082 032 084 079 032 080 079 083 120 
29972: 075 084 073 079 078 032 090 069 082 079 O13 032 036 
29984: 032 032 032 032 193 032 032 19 073 0B 045 0B3 149 
29996: 083°069 077 06 076 069 032 070 082 079 077 032 088 
30008:067 085 082 083 079 082 O13 032 032 032 032 032 195 
300203197 032 032 197 088 047 076 085 OBS 073 086 069 129 
300323032 207 210 032 066 085 070°070 069 082 013 032 024 
30044:213 O83 069 032 067 085 082 083 079 082 032 075 050 
30056: 069 0B9 083 032 084 079 032 077 079 086 049 032 147 
30068: 067.085 082 083 079 082 04 000 169 001 140 117 043 
30080: 162 251 032 189 255 169 002 168 174 175 002 032 203 
30092; 186 255 032 192 255 162 O15 032 201 255 032 186 151 
301043117 032 204 255 162 O15 032 201 255 032 200 117 238 
301162162 000 032 201 255 162 002 032 198 255 032 237 196 
301283117 142 000 032 198 255 032° 201 285 096 162 000 150 
301403189 214 117 240 006 032 210 255 232 208 245 096 184 
30152162 000 189 227 117 240 006 032 210 255 252 208 030 
30164: 245 076 046 045 082 058 050 044 O48 044 047 056 O71 
301762044 048 000 066 045 080 052 050 044 049 052 052 044 
30188:000 142 000 032 207 255 157 003 110 232 224 016 098 
302001208 245 096 035 142 006 160 000 024 032 019 229 175 
30212:169 000 133 199 133 212 162 000 189 049 118 240 072 
30224:006 032 022 231 232 208 245 162 006 160 008 024 072 
302342032 010 227 032 101 118 096 040 067 O41 OBS 084 197 
302483069 086 069 032 077 069 072 067 087 195 079 077 253 
30260:077 065 078 068 058 032 032 032 032 032 032 032 110 
30272:032 032 032 032 032 032 032 032 032 032 032 032 192 
302842032 032 032 157 187 157 187 157 157 157 157 157 049 
30296: 157 157 157 157 157 157 157 187 157 157 157 157 180 
30308: 000 149 000 133 204 032 228 255 201 000 240 249 019 
30520:135 204 096 141 181 002 202 072 208 003 076 168 041 
30332114 162 000 189 141 118 240 008 205 181 002 240 188 


30344; 086 232 208 243 09 O19 072 067 043 078 082 087 169 | 31040:187 09 
6 084 OBE O45 OBO 140 135 134 066 137 017 145 073 049 050 
9 157 138 139 068 133 045 069 000 049 127 168 022 
4 O54 121 O17 120 247 119 253 118 124 119 105 147 
10 201 124 119 124 073 120 005 120 240 118 037 049 
3 21 119 175 120 162 120 063 122 165 122 201 127 
2 2K7 122 116 120 141 120 053 125 030 126 032 026 
3127 177 127 138 O10 170 189 169 118 133 251 232 013 
304402189 169 118 133 252 108 251 000 169 002 032 195 05a 
30452:255 149 O15 032 195 255 076 226 252 162 O15 032 136 
304642201 255 142 000 189 120 119 240 006 032 210 255 253 
304762232 208 245 162 002 169 000 032 205 187 032 154 106 
169 000 174 174 002 032 205 189 032 154 119 113 
000 166 057 032 205 189 032 154 119 169 000 O48 
052 032 205 189 032 204 255 162 039 169 032 055 
040 004 202 O16 250 173 181 002 201 009 208 222 
076 162 015 032 198 285 160 000 162 001 024 15: 

O10 229 169 002 141 134 002 032 207 255 201 21 

240 006 032 022 231 076 092 119 032 163 119 217 
900 O32 198 255 032 201 258 032 204 255 076 038 
049 058 000 032 204 255 032 O31 125 142 015 144 
201 285 162 000 :89 157 119 240 006 032 210 201 O43 122 032 080 124 165 002 024 105 008 133 206 
30808: 255 232 208 245 032 O15 119 076 253 118 169 044 LIB 2 O41 128 O10 042 197 045 240 003 032 238 119 145 
30620:076 210 255 OB5 050 058 000 032 204 255 032 198 07S | 313142230 150 165 150 201 024 208 004 169 008 133 150 140 
306322119 162 002 032 198 255 162 000 O32 207 255 157 213] 31328:164 151 146 150 024 O32 O10 229 149 006 141 134 192 
30644:000 202 232 208 247 173 000 202 133 060 173 001 019 ] 312402002 169 OO 133 199 169 032 032 022 231 166 002 242 
30856: 202 133 059 076 092 110 032 204 255 162 015 032 022 | 31382:189 000 202 032 060 110 149 032 032 022 231 162 081 
306682201 255 162 000 189 223 119 240 006 O32 210 255 O49 | 313642004 160 021 024 032 010 229 146 002 199 000 202 147 
30680: 232 208 245 032 204 255 094 44 045 080 058 050 251 | 313762170 167 000 032 205 189 032 226 113 169 000 133 046 
30692:044 048 000 165 002 024 105 128 133 002 165 O65 OBS | 31388199 169 001 141 182 002 076 077 127 032 OBO 124 086 
30704:073 001 133 065 076 092 110 166 057 232 224 036 225 165 902 054 233 008 133 002 041 128 010 042 197 Lat 
307162208 002 142 001 134 057 076 253 118 166 057 202 152 O65 240 003 032 238 119 198 150 165 150 201 007 212 
30728:016 002 162 035 134 057 076 253 118 230 058 166 O35 | 31424:208 004 149 023 133 150 074 096 122 032 080 124 129 
30740:057 189 037 120 197 OSB 144 003 076 253 118 169 161 | 314342230 002 165 002 041 128 010 042 197 O65 240 003 049 
30752:000 133 058 076 247 119 020 020 020 020 020 020 017 | 31448:032 238 119 165 151 024 105 003 133 151 201 029 O31 
307643020 020 020 020 020 020 020 020 020 020 020 018 026 31460: 208 014 169 005 133 151 165 002 056 233 008 133 225 
30776: 018 018 018 018 O18 018 O17 O17 O17 O17 O17 017 010 | 314722002 076 063 122 076 076 122 032 080 124 198 002 209 
307BR:016 016 O16 O16 016 198 O58 O16 O13 166 057 202 090 | 314B4:165 002 041 128 010 042 197 045 240 003 032 238 135 
30800:240 O11 189 037 120 133 058 076 005 120 076 253 118 | 31496:119 165 151 056 233 003 133 151 201 002 208 O14 144 
3OB12:118 162 035 187 037 120 133 OSB 134 057 076 253 184 31508: 169 026 133 151 165 002 024 105 008 133 002 076 246 
30824118 165 060 133 057 165 059 133 058 076 253 118 219 31520: 165 122 076 096 122 169 000 133 212 169 147 032 195 
3OB3bI173 174 002 073 OO 141 174 002 174 174 002 189 115 | 315322022 231 169 001 140 123 162 228 032 189 255 169 249 
30848: 139 120 141 112 114 032 251 255 076 O41 114 048 O15 | 315442001 142 008 160 000 032 186 255 032 192 255 142 221 
308602049 238 175 002 173 175 002 201 012 208 005 169 O13 | 315562001 032 198 255 032 18% 255 032 243 123 032 243 141 
30872:008 141 175 002 032 231 255 076 O41 114 147 002 118 | 315482123 167 O13 032 022 231 032 2#S 123 032 243 123 186 
30884:032 195 255 169 OLS 032 195 255 076 O41 114 165 172 | 315802032 243 123 133 251 032 243 123 166 251 032 205 134 
308963083 201 072 240 007 169 072 133 063 076 197 112 O45 | 319923189 056 032 010 229 160 004 024 032 010 229 149 224 
3070Bs 169 068 133 043 076 197 112 134 066 167 000 141 286 |] 31604001 133 212 032 243 123 201 034 208 249 032 243 035, 
30920;185 002 169 001 133 212 032 228 255 072 160 000 113] 314162123 201 034 240 006 032 022 231 075 126 123 032 094 
309321122 204 132 207 132 212 160 OOL 132 212 104 240 O32 | 316282243 123 201 O32 240 249 133 252 169 000 133 212 079 
O15 240 025 201 920 240 049 174 185 002 O19 | 31480:056 032 010 229 140 022 024 032 O10 229 162 000 074 
002 032 210 255 238 185 002 173 185 002 141 5 252 157 063 124 032 243 123 240 007 232 157 147 
30968: 197 066 240 O15 208 208 174 185 002 169 000 157 O77 13124 076 167 123 162 000 189 O43 124 032 022 043 


309803000 002 160 000 132 212 096 056 032 O10 229 134 D4E 1 232 224 005 208 245 1697 013 032 022 231 076 084 
4b 123 162 000 189 229 123 240 006 032 022 231 107 n 


240 040 032 022 
052 053 054 OSS 


064 
006 
199 075 121 
421 010 
197 158 2¢ 
064 1 
122 032 9 
9 000 133.122 1 

976 162 006 160 000 024 032 010 229 162 000 129 
255 121 240 006 032 022 231 232 208 245 032 241 
12t 165 064 133 OSB 032 197 112 169 032 162 118 
157 240 004 202 016 250 032 253 118 096 197 056 
084 069 082 032 206 197 215 032 211 197 195 062 
2 207 210 058 032 000 162 003 032 195 120 173 136 
002 201 032 208 004 032 092 110 076 226 111 096 
002 240 007 076 047 126 032 135 121 096 032 150 
127 173 000 002 133 159 173 001 002 133 158 240 


30992:024 032 010 229 206 185 002 076 206 120 206 185 217 
310042902 048 O17 169 032 032 028 234 056 O22 O10 229 149 317003232 208 245 167 001 032 195 255 162 000 032 198 149 
H01b:136 024 932 010 229 076 2 002 076 094 ‘TA712:255 076 003 124 036 066 076 079 067 075 083 032 172 
41028:206 120 162 006 160 000 024 O32 O10 22 142 000 ITS ] 317242070 082 069 049 046 O13 000 032 183 255 O41 064 136 


E 


31734:208 004 032 207 255 096 104 104 074 202 123 162 029 
317482000 189 028 124 240 006 032 022 231 232 208 245 025 
317602165 197 201 040 208 250 082 241 111 076 138 113 O16 
317722017 032 032 032 208 082 069 083 083 032 018 032 236 
317B4:211 208 193 195 197 032 146 032 084 079 032 067 236 
317963079 078 084 073 078 085 067 046 046 046 000 146 114 
31808:032 084 079 032 067 079 078 084 073 078 085 069 136 
31820:046 046 044 000 164 151 166 150 024 032 010 229 116 
318322169 O14 141 134 002 169 032 032 022 231 166 002 178 
318442189 000 202 032 040 110 167 032 032 022 231 169 068 
9542014 141 182 002 076 077 127 160 000 162 006 024 059 
318482032 010 229 169 000 133 212 032 173 124 032 177 167 
31880: 121 173 000 002 201 032 240 O13 166 002 165 064 035 
319922157 000 202 032 201 122 076 119 124 162 039 169 O15 
319043032 157 240 004 202 O16 250 032 092 110 076 201 036 
319161122 162 000 189 187 124 240 006 032 022 251 232 183 
319282208 245 096 197 078 0B4 069 082 032 086 065 076 222 
31940085 067 058 032 000 160 000 162 006 032 010 229 O15 
319521167 000 133 212 032 004 125 169 O01 133 212 162 024 
319642026 032 195 120 162 000 187 000 002 240 016 164 086 
319762002 153 000 202 138 072 032 201 122 104 170 232 124 
319882076 226 124 162 039 169 032 157 240 004 202 O16 155 
320003250 076 092 110 162 000 189 O18 125 240 006 032 020 
320123022 231 232 208 245 096 197 078 OB4 067 082 032 052 
320243084 069 OBB 084 058 032 000 032 198 119 162 002 184 
320362032 201 255 162 000 189 000 202 032 210 255 232 O14 
32048:208 247 076 204 255 076 127 125 169 032 932 210 017 
32060: 255 032 183 255 048 001 096 076 213 125 072 072 208 
320721175 178 002 201 085 240 003 076 104 126 169 255 148 
320841141 003 221 173 O13 221 104 141 OO 221 173 000 216 
32096: 221 041 251 141 000 221 009 004 141 000 221 173 239 
321082013 221 041 016 208 O11 032 225 255 208 244 032 078 
32120241 141 076 226 111 104 096 169 000 133 251 149 O15 
321322004 133 252 169 024 133 190 173 178 002 201 083 138 
32144: 240 037 142 001 032 201 255 032 006 12h 19 O13 140 
321562032 070 125 165 251 024 105 040 133 251 144 002 218 
32168:230 252 198 190 O16 253 19 013 082 070 125 032 192 
321801070 125 076 137 126 169 000 032 189 255 169 004 252 
321923162 004 160 007 032 186 255 032 192 255 162 004 107 
322042032 201 255 032 056 125 076 151 125 162 000 189 072 
322161229 125 240 004 032 022 231 232 208 245 076 144 214 
322281124 019 017 208 082 073 078 084 069 082 032 067 141 

32240:079 077 07 085 078 073 047 065 084 O73 079 078 131 

322521032 0697 082 082 079 082 046 046 046 000 140 000 208 

322643177 251 041 127 201 031 144 003 076 021 126 009 191 

322763096 032 070 125 200 192 040 208 235 096 173 178 129 
32288: 002 201 085 240 006 169 OBS 141 178 002 096 169 126 
13 208 248 162 000 187 043 126 240 006 032 022 143 
1 232 208 245 076 226 111 O19 O17 205 213 211 002 
1212 032 066 069 032 212 215 207 032 066 089 084 104 
323342069 083 032 073 078 032 200 197 216 032 078 085 231 
7 Obb 049 O82 O46 032 032 032 032 032 032 000 112 
4 201 O65 144 006 201 096 144 018 073 032 032 196 
10 255 O32 234 255 032 225 255 240 O18 104 096 024 
‘323BHL07 226 111 201 O91 17 256 144 232 173 178 002 182 
323962201 085 240 O13 032 204 255 149 004 032 195 255 033 
32408: 142 000 032 201 255 169 000 133 197 032 241 111 149 
324202032 138 113 032 092 110 076 226 111 224 O14 240 036 


32432:018 162 000 134 212 189 204 124 240 006 032 022 241 
324 1 232 208 245 076 226 111 162 042 160 000 132 221 
324561212 076 181 126 019 O17 197 210 210 207 210 032 105 
324683079 078 032 073 078 080 O85 084 032 076 073 078 O36 
32480069 045 032 198 085 078 047 OB4 075 079 078 032 120 
324922067 065 078 067 069 076 076 049 068 000 O19 O17 139 
32504:211 079 082 082 089 044 032 078 085 077 Obb O69 218 
325162082 032 079 O85 084 032 079 070 032 082 O65 078 036 
325281071 049 O46 044 046 032 032 032 032 032 032 032 006 
325402032 032 032 000 165 002 133 251 169 202 133 252 181 


32552:032 000 192 032 241 111 076 138 113 149 000 135 253 
325643002 133 065 032 092 110 169 005 133 151 169 008 097 
32574133 150 076 096 122 169 001 135 212 032 0% 165 167 


165 150 056 233 008 010 170 189 112 127 133 245 
189 113 127 133 252 165 181 056 233 005 024 25! 
32121106 170 189 144 127 168 173 182 002 145 251 076 O41 
326243095 217 135 7S 217 215 237 265 217 039 218 025 
726362079 218 119 218 159 218 199 218 239 218 O2E 219 
32b48:063 219 103 219 142 217 193 219 000 001 O00 o02 
326402003 000 004 00S 000 006 007 162 039 169 032 157 22 
32672:240 004 202 016 250 096 068 049 040 067 041 083 056 
‘326842077 049 057 056 052 160 000 162 006 024 032 010 089 
326961229 169 000 133 212 032 175 124 032 177 121 173 223 
32708: 000 002 201 032 208 003 076 157 124 162 000 189 070 
327203000 202 069 064 157 000 202 202 208 245 032 092 145 
32732: 110 076 226 111 189 191 064 157 153 191 000 251 147 
327443212 253 157 191 076 255 004 153 013 084 068 069 231 
327543131 000 000 000 000 083 000 143 127 232 000 000 192 


SS 
ED2 Listing 


49152:169 022 141 OBL 194 169 127 141 013 220 149 147 057 
491643032 022 231 169 000 133 253 032 156 192 032 120 104 
49176193 206 081 194 208 261 169 255 141 O13 220 075 229 
49188:022 194 082 079 985 084 073 078 067 083 032 065 214 
492003082 049 032 067 079 080 089 082 073 O71 072 084 160 
492123032 083 084 069 086 069 032 077 069 072 067 087 121 
044 032 050 032 079 086 069 082 084 079 078 032 051 
080 065 082 075 044 032 083 084 082 045 OBE 072 144 
49248:069 086 069 078 044 074 065 078 065 082 075 OB3 198 
2. O73 082 069 044 032 083 047 079 084 076 O45 166 
49272:078 068 044 032 077 076 049 048 032 054 085 087 082 
1b 032 032 084 072 065 078 O75 DBT O32 084 079 126 
32082 065 O68 073 079 032 079 078 069 O4b 032 111 
B 177 251 133 010 170 187 000 198 133 O18 189 000 
49320: 000 199 201 007 208 004 160 001 132 253 010 170 235 
493322189 247 193 133 158 189 248 193 133 159 165 252 135 
493443032 109 194 165 251 032 109 194 169 058 032 022 023, 
493542231 032 017 194 165 010 032 109 194 165 018 240 075 
49368: 021 230 O18 160 001 177 251 072 032 017 194 104 213 
49380032 109 194 200 196 O18 208 241 198 018 056 032 194 
493923010 229 160 O18 024 032 010 229 146 010 189 000 037 
49404195 032 022 231 189 000 196 032 022 231 189 000 055 
494161197 032 022 231 166 O18 240 076 032 O17 194 202 155 
49428: 240 036 160 000 17 158 240 064 201 046 240 006 052 
494403032 022 231 200 208 242 132 147 140 002 177 251 044 


(ecccceccecoecceleleeceele 


49452: 136 032 109 194 177 251 032 109 194 164 147 200 253 
49464; 208 222 165 253 208 0B 160 000 177 158 240 024 165 
494763201 046 240 006 032 022 231 200 208 242 132 147 239 
49488: 160 001 177 251 032 109 194 164 147 200 208 228 159 
49500: 169 O13 076 022 231 077 045 068 069 076 069 073 076 
49512:078 049 032 074 065 067 079 O66 044 046 046 046 050 
495243046 046 046 033 165 251 101 O18 144 002 230 252 170 
49536:105 001 144 002 230 252 133 251 165 252 201 203 019 
49548240 001 096 104 104 076 030 192 165 251 133 155 151 
49560: 165 252 133 156 169 036 032 022 231 160 001 177 150 
49572:251 056 164 156 170 016 001 136 101 155 144 001 235 
49584: 200 170 232 208 001 200 152 032 109 194 138 032 052 
495941109 194 076 092 193 000 035 034 046 000 034 046 027 
49608: 000 036 044 044 OBB 000 034 04 044 089 000 036 153 
49620: 046 000 036 046 044 OBB 000 O36 944 044 089 000 175 
4632: 000 036 046 000 040 036 046 044 088 041 000 040 129 
49644: 036 046 041 044 089 000 040 036 044 041 000 193 080 
47656: 193 194 193 198 193 201 193 206 195 211 195 214 070 
49668: 193 219 193 224 193 225 193 228 193 235 193 242 231 
49680: 193 169 029 076 022 231 162 024 160 003 024 032 117 
49692:010 229 162 000 189 050 194 240 006 032 022 231 113 
49704: 232 208 245 165 197 201 060 208 250 094 208 082 144 
497162069 083 083 032 O18 O32 211 208 193 195 197 032 125 
49728: 146 032 084 079 032 067 079 078 084 073 07 OBS 213 
49740:069 046 046 046 000 002 047 079 080 089 082 073 243 
49752:071 072 0B4 032 083 084 067 084 069 032 077 069 148 
49764: 072 069 087 044 032 049 057 056 053 072 074 074 O71 
497763074 O74 032 120 194 104 041 O15 248 024 105 144 007 
49788:105 064 216 201 058 144 002 009 128 076 O22 231 100 
49800: 237 152 160 000 052 033 246 076 144 192 076 172 120 
49812: 202 074 14 250 032 208 247 144 245 032 019 202 155 
49824:032 056 248 176 237 O32 143 246 162 002 181 173 056 
49036:072 181 192 072 202 208 247 048 010 002 080 003 205 
49848:032 008 205 165 147 032 106 247 162 000 104 149 005 
3 104 149 174 232 224 002 208 245 032 124 246 081 
7 144 192 044 010 002 048 092 165 186 240 088 215 
1 003 240 084 144 057 169 096 133 185 164 183 087 
0. 074 O52 175 245 032 213 243 145 186 032 009 086 
7 185 185 032 199 237 032 019 238 133 193 165 031 
49920:066 079 065 063 063 079 045 063 080 079 065 043 060 
3 079 065 063 046 079 063 O43 063 079 065 063 OSS 
7 079 O65 063 O43 079 OBS 043 074 045 063 063 043 
499562066 O65 082 063 080 065 082 063 066 O45 OB2 063 110 
499681066 065 043 063 063 045 OB2 043 0B3 065 063 063 O84 
49980:063 065 082 063 082 067 043 O63 O43 049 O76 O43 113 
49992:080 069 076 063 074 049 076 O63 O44 067 043 063 135 
500043063 069 076 063 067 069 063 063 063 069 076 063 120 
50016:082 065 063 063 063 065 082 063 080 065 082 063 164 
50028:074 O65 082 063 066 O65 063 063 O63 O65 082 063 154 
500403083 065 063 063 063 065 082 063 063 083 043 063 171 
50052: 083 083 O83 063 068 063 084 063 083 0B3 083 063 010 
50064:066 083 063 043 0B3 OBS OBS 063 0B4 083 084 065 021 
500762063 0B3 063 063 076 076 076 063 076 076 076 063 242 
500BB:084 076 084 063 076 076 076 063 066 076 063 063 010 
50100:076 076 076 063 067 076 084 063 076 076 076 063 028 
50112:067 067 063 063 067 067 068 063 073 067 048 063 220 
501242067 067 068 063 066 067 063 063 063 067 Ob8 043 221 
50136:067 067 063 063 063 067 068 063 067 OBS 063 063 245 


50148: 067 083 073 063 073 083 078 063 067 083 073 063 073 
501402066 083 043 063 063 OB3 073 043 083 083 063 063 045 
50172063 083 073 063 082 082 063 063 063 082 O83 063 091 
50184:072 082 O83 063 063 082 083 063 080 082 063 063 119 
501962063 082 083 063 076 082 063 063 063 082 083 063 118 
50208: 083 078 043 063 073 078 079 043 076 078 079 063 140 
502202073 078 079 063 077 078 063 063 063 078 079 O63 133 
50232:069 078 043 063 063 078 079 043 084 079 045 O63 133 
50244:063 079 083 063 072 079 O83 063 077 079 083 063 187 
50256:086 079 O63 063 063 079 083 063 076 079 063 043 172 
50268:063 079 083 063 084 068 063 063 063 068 079 043 163 
50280:076 068 079 063 977 068 079 063 086 068 O43 063 189 
502925063 068 079 063 069 068 063 043 063 068 079 063 157 
50304:063 084 063 063 084 084 084 063 069 O43 088 063 231 
503141084 084 0B4 063 047 084 043 063 084 084 084 043 023 
50328: 089 OB4 088 043 063 084 063 043 068 O48 068 063 248 
50340: 068 068 068 063 065 068 O65 043 048 048 068 O43 191 
50352067 068 063 063 068 048 O68 043 076 048 OBS 063 226 
50364: 068 068 068 063 080 077 063 043 080 07 069 063 003 
'50376:078 077 069 063 080 077 069 043 078 07 063 063 033 
50388: 063 077 069 063 076 077 063 063 063 077 049 063 O11 
50400: 080 06 O43 063 080 066 078 063 078 066 079 063 045 
50412080 966 078 063 049 066 063 043 063 066 078 063 030 
504242069 066 043 063 063 066 078 063 075 045 063 063 021 
504362063 065 076 063 080 045 076 083 063 045 076 O63 054 
50448:076 065 063 063 063 065 076 063 067 065 063 063 040 
50460:063 065 076 063 082 068 063 063 084 068 076 063 094 
50472:080 068 076 063 0B4 068 076 063 073 0B 063 063 117 
50484063 068 076 063 067 068 063 063 063 048 076 O63 085 
504962073 082 063 063 063 082 082 063 065 082 082 063 159 
50508080 082 082 063 067 082 063 0463 063 082 082 063 180 
50520073 082 063 063 063 082 082 963 083 047 063 063 147 
50532:063 067 082 063 065 067 082 063 080 047 082 063 176 
50544: 083 067 063 063 063 067 082 063 073 067 0463 063 161 
50556: 063 067 082 063 043 065 063 063 089 065 0BB 063 190 
505482087 043 O45 063 089 065 088 043 067 065 063 O43 211 
505802087 O85 088 O63 045 O65 OBT 043 O43 O45 063 063 215 
50592:089 065 O88 065 087 O45 OBB 063 089 065 088 O63 O51 
50604:087 O65 088 063 083 065 063 043 OBF 045 OBE 063 032 
50616:086 065 088 065 087 0b5 OBB 063 089 080 043 063 042 
50628:089 080 047 063 089 080 088 043 087 080 047 042 090 
50640:069 080 043 063 063 080 067 043 068 080 063 063 006 
50652:063 080 067 063 088 047 063 063 088 067 067 063 O35 
50664: 088 067 080 063 OBB 067 047 063 081 047 063 063 045 
506762063 087 047 063 048 07 043 063 063 047 067 063 001 
50688:000 001 000 000 000 001 001 000 000 001 000 000 004 
507002000 002 002 000 001 001 000 000 000 001 001 000 020 
50712:000 002 000 000 000 002 002 000 002 001 000 000 033 
507242001 001 001 000 000 001 000 000 002 002 002 000 046 
507342001 001 000 000 000 001 001 000 000 002 009 soo os 
50748:000 002 002 000 000 001 000 000 000 001 001 000 067 
50740:000 001 000 000 002 002 002 000 001 001 000 000 o8t 
507721000 001 001 000 000 002 000 000 000 002 902 000 092 
‘507843000 001 000 000 000 001 001 000 000 001 000 000 100 
507962002 0¢2 002 000 001 001 000 000 000 001 001 000 118 
50808;000 002 000 000 000 002 002 000 000 001 000 000 127 
50820: 001 001 001 000 000 000 000 000 002 002 002 000 141 
50832:001 001 000 000 001 001 001 000 000 002 000 000 151 


cE 


50844: 000 002 
50856: 000 001 
50868: 001 001 
50880: 001 001 
50892:002 002 
50904: 000 002 
50916:001 001 
50928:001 001 
509403000 002 
50952: 008 001 
50964: 000 003 
509763005 010 
50988: 005 005 
51000: 008 007 
51012000 002 
51024; 009 O11 
51036000 006 


000 000 001 001 001 000 001 001 001 000 164 
000 000 002 002 002 000 001 001 000 000 17 
001 000 000 002 000 000 002 002 002 000 191 
000 000 001 001 001 000 000 01 000 000 198 
002 000 001 001 000 000 000 001 001 000 214 
000 000 000 002 002 000 001 001 000 000 224 
001 000 000 001 000 000 002 002 002 000 238 
000 000 000 001 001 000 000 002 000 000 246 
002 000 000 010 000 000 000 002 002 000 O14 
000 000 000 005 005 000 009 O11 000 000 047 
003 000 008 007 000 000 000 006 004 000 053 
000 000 002 002 002 000 008 001 000 000 042 
005 000 009 011 000 000 000 003 003 000 08s 
000 000 000 006 006 000 008 010 000 000 101 
002 000 008 901 000 000 005 005 005 000 096 
000 000 000 003 003 000 008 007 000 000 121 
006 000 008 010 000 000 000 002 002 000 126 


155 
149 
160 
185 
193 
202 
a) 
24 
252 
245 
002 
021 
193 


51048:008 001 000 000 012 005 005 000 009 O11 000 000 
51060:000 003 003 000 008 007 000 000 000 00 006 000 
}0 010 000 000 002 002 002 000 008 000 008 000 
15 005 005 000 009 011 000 000 003 003 004 000 


2 002 002 000 008 001 008 000 005 005 005 000 
7 O11 000 000 003 003 004 000 008 007 008 000 
1b 006 007 000 001 010 000 000 002 002 002 000 
IB 001 008 000 005 005 005 000 009 O11 000 000 
10 003 003 000 008 007 000 000 000 004 004 000 
1 010 000 000 002 002 002 000 008 001 008 000 
5 005 005 000-009 O11 000 000 000 003 003 000 
51192: 008 007 000 000 000 006 00 000 002 142 028 002 
512043076 144 192 201 078 240 003 076 169 200 032 223 102 
51216: 204 133 187 134 188 052 162 202 141 015 002 142 022 
5122B:016 002 032 162 O13 204 016 160 160 160 160 160.249 


** TAPE BACK-UP DEVICES ** 


The DCL} inks two Oatasettes, 20 that loading any 


Free 
Catalogue 


c- 


DCL1 including 7 wor Datasette Not 
Tee et tae aA PT Bee 2 
DCL4 Soares te 
Interface rea oe cepa 
DOLAA SRA ee BET wr ob ae 
Pe fase TNE" ONDERASDCLAR RCE C1850 
** BACK-UP PROBLEMS SOLVED ** 
Alignment Sarsn/'y Oru ttenantro cesanns™™ 
Tape TAN Ceo aah 
Tape Head ferent woventsc saris onan ite 
Demagnetiser "ussite? "sti Noy Bick 20 
** GT LOADER CARTRIDGE ** for 1541 D/Drive ** 
GT Loader [actions tty Wein urine 
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** FREE CATALOGUE ** Please send 17p stamp 


ALSO AVAILABLE WITH BUILT IN RESET SWITCH 
ORDER AS GIL? | PRICE £22.00 


SAUL INCLUSIVE Prices 
9 BROTHER HAS, 80 col Dat Mati Printer... ..€149.00, 
$8 Pioetiry cats colour Mornor for ESME4.£199.00 
8 PRINTER Ganle and software diver for COMBA. £12.90 
9, THE STICK. Te fanaa nay bac oye 112.8 


** 10 DAY MONEY BACK GUARANTEE ON ALL HARDWARE ** 


(ORDERING. ALL PRICES ARE FULLY INCLUSIVE — NO 


Terms: HIDDEN EXTRAS AND INCLUDE RECORDED DELIVERY 
(EXPORT add £1.09 ent 
TRILOGIC 29 HOLME LANE, BRADFORD 
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COMMODORE SOFTWARE SPECIALISTS 
FREE COMPUTER XMAS CARD 
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(C64 only) 


SI 


‘Superbase 128 


NEW 9005 4750 4 
NEW 7805 6898 ¢ 


piper samara Sa 


Grae CHion cian mee. ‘ragonend (taka) 
Superba Starr 


Heo asin bok 
Eis 
Wistoringer by Infocom, 


‘Gonmodore O Lever sublecte 28 
Bora Bucks Plnyaound NEW 298 
‘Ga any to sed ye), (ape SS 
sera 6) H 

Werdpower (10+) 


Faning aor 
Ireporibe Mision’ 


‘atte of Grain 
Combat Leader & Batt for Noy 


Germany 1885 New 8395 Lords of Mamgnt ‘aes ‘750 1 
Rennes) Approsens NEW 1435 Mercenary new 995 so t 
Soe i335 Menepalt 1265 1100 t 
SGoioge Fig Simuistorn 48S ecg Beton se New tie5 1030 
Sublogie Flgm Simulator! 3885 Rescue from Fraciaue: "NEW ‘ds "ago 
‘Then Eero 385 Sernobie 1295 100 
Tigersig ne Sow NEW 1995 Soy ve Spy or isang Caper) ‘Sas ‘a0 t 
74 Fight Simulator (DocsoHy 1298 Sion few 05 gat 
= Sip Poser 38 te 


Wimer Games" 


Bet 


Thompsons Star Events NEW 795” 635 1 
#888 W749 € Gul Wing Vulcan NEW as S08 ¢ 
a word Cus. 


+ am, t,o mt 

SETS woe Ht 8 Oh te oe 

Terie eh in tine So tae ee eenrene 
wienaroarem tae 


SIMON'S BASIC. 
Sunerivee Typing course)" 
‘ute Conan 


aes saao 


Fs Anon 
Wolcematser by Artog” (ora 


PO Box 36 Telephone: 
BUNSTABLE ERS OP HCEN LAE ETD (2G) DUNSTABLE 
Beds LUS 2NP (0582) 607829 


a 


De De he De Se Be Re De 


FOR THE CBM 64 


‘Let there be sprites ...’ a collection of eight of Jeff Minter s hairy classics 
for the ‘64; 
ATTACK OF THE MUTANT CAMELS *MATRIX LASER ZONE *HOVER BOVVER 
REVENGE OF THE MUTANT CAMELS *SHEEP IN SPACE *METAGALACTIC LLAMAS 
BATTLE AT THE EDGE OF TIME *ANCIPITAL 
IN PRESENTATION BOX WITH J.M.’s HISTORICAL NOTES! —ON DISK £11.95 ON 2 TAPES £9.45, 


FOR THE BBC ‘B’ 


A great version of this unique software, for BBC owners. 
COLOURSPACE and its predecessor PSYCHEDELIA have been 
described as INTERACTIVE FIREWORKS, the player readily producing 
fantastic lightshows, a wonderful accompaniment to favourite music. 
We've caught the rainbow... ON TAPE £7.95 


GAMES AVAILABLE FROM ALL GOOD COMPUTER RETAILERS OR FROM LLAMASOFT LTD. 49 MOUNT PLEASANT. TADLEY, 
HANTS TEL: (07356 4478) S.AE, FOR CATALOGUE & NEWSLETTER ‘THE NATURE OF THE BEAST’ 


PREPARE FOR BATTLE! NO THIS IS NOT 
a quick, trigger-happy game, but a 
sophisticated, thought provoking, 
strategy game which | found highly enter- 
taining and absorbing. 

You play either the Allied or German 
Supreme Commander and control the 
fate of Europe in 1944. You can change the 
course of history from your own living 
room. 

The game has five different scenarios. 
Each allows you to enter the battle for 
France at a different stage. 

The first part is the battle for 
Normandy. The scene is set, June 1944, 
The war in Europe hangs in the balance. 
Three Elite paratroop regiments have 
been dropped in advance and the Allied 
infantry divisions have just landed and 
started moving in land. The Germans try 
to drive you back into the sea as reinforce- 
ments for both sides begin to arrive. 

Choose which army you wish to 
command, then play a friend or pit your 
wits against the computer. You are 
allowed to alter the balance of play 
according to your experience. 

Using a joystick or keyboard for 
control, you first freeze the action to 
allow you time to examine your troops, 
the opposition, survey the countryside 
and decide your strategy. Once you have 
formulated your plan of action you start 
giving your orders. You can order 
different units to attack, defend or move. 

Will you decide to risk an all out 
offensive or dig in and wait for reinforce- 
ments to arrive? You make all the 
decisions, tap in your orders and watch 
the battle take place on the screen, But 
keep your eyes peeled as the enemy 
moves around and always be prepared to 
rethink your strategy. 

At any time you may call up any units 
and receive a current status report, How 
many men are left? How experienced are 
they? What is their efficiency level? Do 
they need to be rested for a while? Can 
you spare them? You must decide all 
this. 

‘As Supreme Commander you can 
never go to sleep because even at night 
the messages keep rolling in: “Attack 
must be halted”, “Await further orders”, 
“We have captured Paris”, “Are supplies 
running out?”. However you can freeze 
the action at any time if youarein need of 
refreshment or a stiff drink to calm your 
nerve endings! | recommend that you 
keep a spare disk handy so the current 
situation can be saved at any time. 


The second part is the race for the 
Rhine. After liberating France the Allies 
rush towards the Rhine to secure the 
German borders, Belgium and Holland. 
Again there is a short and long variation. 

The scrolling screen allows you to have 
an overall picture of the battle as it 
progresses, Also the computer constantly 
tells you the present date, time and 
weather conditions. 

The graphics are extremely re 
and the battle is easy to follow. The sound 
effects make the war come to life - the 
volume level of each attack indicates how 
much damage is being inflicted on the 
opposition. 

‘Operation Market Garden is the next, 
section which allows you to control 
Hitler's crack $8 Panzer troops in a last 
desperate bid to split the British and 
‘American armies and force them back 
into the sea. Can you succeed where 


Hitler failed? Or will the snowy, wintry 
conditions overcome your offensive? 

The final Crusade for the Battle for 
France is the big one. Start from the 
landing of the troops in Normandy, 
secure a beach head, push the Germans 
backwards as you liberate Paris and then 
race across France and Belgium to the 
German borders. 

This program has many interesting 
features. At any time you can press “?” to 
receive an up-to-date status report on 
how many casualties have been sustained 
by each side and who is currently 
winning. And, at the end of each section, 
you will be awarded a final rank for your 
performance ranging from Private to 
Supreme Commander. 

Even if you have no previous 
experience of strategy games, | strongly 
recommend you buy Crusade in Europe- 
you won't be disappointed. 
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Sherwood forest. 


Forestry Lesson 


WHAT IS YOUR APTITUDE FOR TREE 
recognition? Can you track someone 
through the wilds of Sherwood Forest? 
Perhaps you need not be too hot on 
beeches and birches but some form of 
pattern recognition comes in helpful 
‘once you get into Robin of Sherwood ~ 
Adventure International's latest graphics 
adventure for the C64. 

Being an avid follower of the TV series, 
| wondered if the computer game would 
be a big let down. The answer, fortun- 
ately, is quite a big no. Adventure Inter- 
national has built up a fair reputation for 
its games and this one certainly can be 
favourably compared with past successes. 

Robin takes about six minutes to load, 
which is quite a long time when you 
realise that a fast loader has been incor- 
porated. ..possibly they have gone for a 
slower ‘fast load’ to overcome some of the 
loading problems encountered by some 
‘companies who use ‘super fast loaders’! 

The review copy loaded without a hint 
of a glitch and six minutesis not very long 
to wait anyway... loading in the data from 
a previously saved game is fast - about 25, 
seconds. This is a useful facility, as all the 
interesting options initially presented by 
the game as your progress unfolds. ..seem 
to end in disaster! 

The graphics are good and for the 
most part are very clear with the impres- 
sion of good detail, They are ‘drawn’ on 
the screen very quickly, which is a good 
thing because you can’t turn them off! 

Tam not a wholehearted supporter of 
graphics with everything, | would usually 
prefer that the effort had gone into the 
text and implementation of the game 
play. Here, I have to admit that the visual 
impression is pleasing and certainly does 
not detract from the business of 
adventuring! 

‘Once loaded, your first task is to get 
Robin and his merry men (not so merry at 
this moment, and only two of them!) out 
of the dungeon at Nottingham Castle. For 
those that get fed up with trying to do this. 
the hard way - the instruction leaflet 
reveals all, ,.well almost all! 

You may feel slightly frustrated for a 
few minutes but persevere and don’t 
forget to examine things/people as you 
progress! Having escaped from the 
dungeon, you now have to get out of the 
castle, 


In conquering this first little puzzle, 
you will already have started to ‘feel out’ 
how Adventure International has set up 
the input command interpreter. You do 
not have to ‘OPEN DOORS’ and then 
move through them, all that is needed is 
‘GO DOOR’ and the rest follows 
naturally. 

If you apparently cannot move to a 
certain object or place, try ‘GO XXXX’ you 
may achieve the desired result. You must 
also determine what is and is not under- 
stood and what sort of response you get in 
each case. 

Some programs will indicate if they do 
not recognise a word. This one ignores 
them completely. Beware of giving an 
instruction and believing that it has been 
carried out because there was no 
response to the contrary! 

Even though only the first four letters 
of a word are necessary for the program to 
know what you are talking about - check 
that your spelling is correct. ‘EXAM PRRIS’ 
instead of ‘EXAM PRIS’ (examine 
prisoners) will elicit the standard response 
‘that nothing special is seen’ and 
examining things is important! 

If you saw Robin of Sherwood on the 


box, you are ata slight advantage, asall of 
the events portrayed in thisadventure are 


related to various episodes and places 
seen in the series. Although, as | have not 
yet solved all of the problems set, there 
may be a few twists that | haven't yet come 
across. 

The game certainly does not require a 
knowledge of the TV plots, so if you do 
not have that feeling of ‘deja vu' just enjoy 
solving a series of logical puzzles that have 
to be completed in the correct sequence. 

‘Once out of the castle you will come 
face to face with Herne the Hunter. He 
will tell you that it is your task to find the 
six Touchstones of Rhiannon and then 
return them to their rightful place. 

‘A touchstone was used to test the 
purity of gold or silver but 1 doubt 
whether thissmall gem of information will 
help you very much! 

‘Once you have left Herne you find (or 
lose!) yourself deep in Sherwood Forest. 
There are 53 locations that have a descrip- 
tion saying that youare in the forest and 
nothing else! 

Panic not, Just reach for your pencil 
and paper, all is not quite the maze it first 
appears - hence the earlier reference to 
pattern recognition. 

Around about and hereand there, you 
will find various places that obviously call 
out for a more careful study and of course 


herein lies the crux of the game. Odd 
bods appear from time to time and some 
of these may be requested to follow 
Robin and lend much needed aid at 
critical moments, 

As the sequence of eventsisimportant 
it is wise to ‘save’ your progress at various 
different points — in case you later find 
you need to tackle things in a different 
order. 

Altogether an enjoyable game that 
should keep beginner and expert out of 
mischief and pleasantly frustrated for 
some time. 


Old But Fun 


US Gold has added to its range of adven- 
tures available in the UK by releasing C64 
versions of two games that have been 
around for some time on other machines. 
The first of these Wizard and the Princess 
was seen on the Atari several years ago 
and shows its age by the simple input 
command analyser 

The storyline is pretty thin - wicked 
wizard kidnaps fair princess...hero 
needed to rescue same! The slightly 
whacky twist is more in the instructions 
than in the game: The wizard as narrator, 
bemoans the fact that previous heroes 
have beaten him and that he hopes to do 
better against you! 

Inputs are expected as just two words - 
verb/noun. In some ways this poses less 
problems to the user than some of the 
more modern complex analysers. Pro- 
viding you have the right two words, there 
is no frustration trying to get the order 
and syntax correct! 

Of course getting the right words can 
still take time! The vocabulary in adven- 
ture games is gradually becoming some- 
what of a standard feature these days so 
EXAMINE is part of the player's normal 
armoury. This is one of the slight di 
ferences you will notice with Wizard and 
the Princess. Here you must use LOOK. 

You must also literally restrict yourself 
to two words. The program does not 
automatically disregard such words as A, 
TO or THE. Itis surprising howevenin the 
less complex games today how much 
progress is overlooked! 

The program is available on disk only, 
and uses ital the time. Nearly every input 
command has the disk unit whirring away, 
checking something, or reading in new 
data. Each location has its own graphics, 
these are colourful and very clear but use 
fairly simplistic designs. 

One point that | found. slightly 
frustrating was that all words had to be 
entered in full to be recognised... lazy, 
that's mel A save game facility is imple- 
mented by using a separate disk (not 
supplied!). As death occurs regularly 
whilst you suss out the problems before 
you, this is a definite plus point! 

Text is kept to a fairly low level with 
many of the clues occurring within the 


pictures themselves, even if youdo need a 
little imagination sametimes to associate 
that red blob as a rock! 

Most of the puzzles, once solved, 
make you want to kick yourself for not 
having seén them earlier. always a good 
sign in an adventure game. The action is 
subdivided into a number of separate 
scenarios, each of which needs to be 
completed before you can move on to the 
next, Make sure you have done all that 
can be done before you move on! 

With the low amount of information 
presented as text and the simple graphics, 
the actions of the player would seem tobe 
somewhat limited. This may seem to be a 
good thing for beginners but my feeling is 
that they may become bored and a little 
frustrated, whereas the more 
experienced adventurer will, probably 
have a little more ‘stamina’ and be 
prepared to ferret away at each location 
trying to find the anomaly that is the vital 
clue. 

Wizard and the Princess is unlikely 
now to challenge the leaders in the 
adventure games world but it presents a 
good challenge to the players’ 
observation and use of limited syntax and 
vocabulary 


Classic Aberration 


The second release from US Gold is 
Ulysses and the Golden Fleece. | always 
thought that it was Jason that got involved 
with this particular hearth-rug but then 
perhaps there is a copyright problem with 
some of Virgil's descendants! 

This program is presented in a very 
similar manner to that above, with limited 
text, simple but descriptive graphics and 
on disk only, The graphics seem to have 
had a little more work done on them and 
the full use of the Commodore’s 
colours makes even these cartoon like 
pictures come to life. 

The story is as you would expect, 
Ulysses must equip his ship and crew, 
sail off... avoid various lethal hazards... 
and return with the fleece, to present to 
the king. 

The initial scenario allows for more 
manoeuvring than Wizard and the 
Princess so beginner adventurers may feel 
more inclined to persevere. Save your 
position fairly often once you have solved 
the first few puzzles, as death is never far 
away 

The dangers you will meet are varied, 
ranging from storms at sea to angry gods. 
Your memories of Greek myths may help 
a bit but some of the puzzles are quite 
subtle so keep a weather eye open all the 
time. ..observe and observe again. 


Observation Plus 
Whether Hacker from Activision will go 


down as an adventure or not, time will 
tell. It has all the hallmarks to suggest that 


it should, as, for instance, there are no 
instructions, You have to find out what it's 
all about yourselt! 

Just a few words could make it more 
interesting to play, though. The leaflet (I 
nearly said instructions!) implied that the 
player has hacked — accidentally - into an 
unknown computer system. From there 
on in... well, observation and a handy 
paper and pencil are paramount 

| appeared to be controlling some 
mega-powerful machine, cruising around 
beneath the surface of the earth (what 
fort). Power is the watchword, power to 
dominate the world - but am | a goody or 
a baddy? Do | assist the machine or foul it 
up and if so, how? 

The system recognises there has been 
a security leak... and not me either. It 
starts asking awkward questions about 
what has been displayed on the screen a 
few minutes ago. | hope you've got a 
photographic memory with total recall. | 
haven't! 

Alter the fifth or sixth attempt | had to 
call it a night even with paper and pencil 
ready, and willing to note dawn any perti- 
nent facts, Starting from the beginning 
every time | failed to remember some vital 
detail and itall became just too much of a 
chore. 

If only | knew what it was | was doing 
down there under the earth - other than 
passing time between awkward 
questions. | shall watch the top 10 charts 
with anticipation and hopefully memory! 


Top 10s 


A number of mags publish lists of top 10s, 
these are derived in several different 
ways, Some are from particular distri- 
butor’s sales to their outlets. Some are 
from inputs from the readers themselves. 
If you sit down and think about it, sales 
could be merely a reflection of how good 
the advertising hype was for that parti- 
cular product and not how good an 
adventure it is! 

What adventures ‘turn you on’? My 
top 10 would include the following; The 
Zork Trilogy by Infocom, several of the 
Level Nine adventures, Exodus: Ultima III 
from US Gold, The Hobbit by Melbourne 
House, one or two from Adventure Inter- 
national, Witch’s Cauldron by Mikro- 
Gen, The Lords of Midnight from Beyond, 
something from Interceptor Micras and 
for pure wonder of animation - 
Impossible Mission from US Gold. 

Yes, | know that gives us more than 10 
but which would you choose? Write in 
and let me know, perhaps I'm missing out 
on something - or my memory is failing! 
Make sure you address any letters to 
‘Runecaster’, Your Commodore etc. The 
editor has enough correspondence to 
open without giving him any extra! 
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This month Margaret Webb 


LAST MONTH | LOOKED AT THE MUSI- 
cal software available for the C64 - the 
computer equivalent. toa Christmas 
stocking drum set. This month, | will 
describe a non-messy approach to paint 
boxes. Those of you with children will 
have discovered the never ending appeal 
of pens, paint and colouring books. The 
main problem, however, is the mess 
generated. | shall not recount the number 
of times I've found felt tip pen stains on 
my children’s bedding! 

‘As with the musical packages, there are 
a wide range of products which cater for 
all sizes of purse. These range from the 
very cheap and simple software to more 

| expensive software/hardware packages. 

The majority of the packages that | will 
describe are drawing programs. Two 
however are rather more like languages 
or Basic extensions. 

There are two basic ways of creating 
graphics on the C64 and C-16. First we can 
build up pictures from the nornial 
character set or from redefined 
characters. Only the Rolf Harris drawing 
program uses this approach, The second 
method is to use bit mapped mode. In this 
mode, individual pixels can be altered 
allowing the creation of complex curves 
and other shapes. Bit mapping is available 
in two modes, A high resolution mode 
allows only two colours in any one 
character space but permits highly 
detailed work, Multicolour mode sup- 
ports four colours in any character space 
but gives slightly coarser results. Both 
have their uses and it's up to you to 
choose. 

Since most of the sketching packages 
use the same or similar set of commands, | 
have compared them in the table and will 
only mention their peculiarities or useful 
features. 

You may notice from the table that 
there is a core of commands which is 
common to most of the software. All 
programs, for instance, allow the drawing 
of dots, lines and circles. This is hardly 
surprising since these form the 
foundation for any sketch. 

Before going into too much detail, | 
had better briefly describe the items listed 
in the table. 

Mode relates to either high resolution or 
multicolour 

Points is a command for the control of 
individual pixels. 

Line allows the drawing of a line between 
two specified points. 


Rays involves the drawing of a number of 
lines, all with one end starting at the same 
point. 

Box relates to the drawing of a quad- 
rilateral by defining two opposite corners. 
Circle as implied by its name draws a circle 
of specified size and position. 

Ellipse is similar to circle and allows the 
drawing of elliptical shapes. 

Arc allows the drawing of curves. 
Fill/Paint colours in a drawn area in a 
specified solid colour. 

Pattern fill is the same as fill but allows 
patterns, 

Air Brush gives a sequence of controlled 
random dots and is useful for shading, 
Screens; many packages provide more 
than one drawing area, This is useful for 
the copying and overlaying of designs. 
Copy area copies a specified area of 
design to another area, 

Move area moves a specified area. 
Zoom magnifies an area of design to allow 
detailed drawing, 

Oops allows you to correct errors or 
accidents made during drawing. 

Brush; apart from providing thin lines, 
many packages provide patterned 
brushes for complex effects 

Mirror provides the means of making 
multiple drawings and kaleidoscope 
effects. 

Text prints words on the picture. 

Hard copy permits you to dump your 
drawing to a printer. 

Save/Load means that you can save your 
masterpiece on disk or cassette 


Control; many packages use joystick or 
keyboard control 

Using the table and these brief comments, 
you can see how useful the packages are. 

Three packages - Koala Pad, Super 
Sketch and Magic Mouse use hardware 
devices. The first two use drawing pads or 
tablets and the latter a mouse. Asa conse- 
quence, they are quite expensive. Magic 
Mouse is a wider based utility and has 
weaker software. Koala Pad and Super 
Sketch are both very good products 
although Super Sketch is the better of 
the two. 

Screen Graphics is a Basic extension 
and as such works very well. Designer's 
Pencil uses a language similar to LOGO 
and is a suitable means of introducing 
children to programming. 

Of the high resolution packages, 
Panorama and Doodle are probably the 
most powerful. Both have great flexibility 
and are simple to use. 

For the younger children, there are 
two packages available. The Rolf Harris 
package is easy to use and allows the 
building up of designs using the Com- 
modore character set. In spite of this 
apparent limitation, the results possible 
are excellent — particularly in the C-16 
version. 

Ebury Software has a program called 
Shape Games. This product is part of the 
Mr T series and allows the creation of 
designs using the basic shapes. A second 
program called Jigsaws introduces the 
child to the basic shapes and encourages 
him to place the shapes in the correct 
position on the screen. 

Publishers 

Super Sketch (£49.95): Anirog, Unit 10, 
Victoria Industrial Park, Victoria Rd, 
Dartford DAI 5A) 

Koala Pad (£99.95): Audiogenic, PO Box 
88, Reading, Berks 

Paintbox (£9.95 both C64 and C-16): 
Audiogenic, 39 Suttons Industrial Park, 
London Rd, Reading 

Panorama (£17.95): Curran Buildings, 101 
St James Rd, Glasgow 

Paint Pic : Kuma Computers, Unit 12, 
Horseshoe Park, Pangbourne, Berks 
Doodle (£14.95): Quicksilva, 222 Regent 
St, London W1 

Rolf Harris (both C64 and C-16): Com- 
modore, 1 Hunters Rd, Weldon, Corby 
NN17 1QX 

Magic Mouse (£59.95): Connexions, SMC. 
Supplies, 11 Western Parade, Great North 
Rd, Barnett, Herts 

Mr T Shape Games (£9.95): Ebury 
Software, National Magazine House, 72 
Broadwick St, London W1V 2BP- 
Designer's Pencil (£11.99): Activision, 15 
Harley House, Marylebone Rd, London 
NWI 
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ONE AREA WHERE CARTRIDGES HAVE 
proved their worth is as utility/Basic 
extension units. Robocom’s Turbo Series 
of cartridges falls very firmly into this 
category adding toolkit Basic commands; 
disk, cassette, printer control systems and 
a machine code monitor. The unit also 
has a very useful soft reset button which 
can get the unwary programmer out of 
some very sticky situations. 

The cartridge which | have been using 
is the Turbo 50 which derives its name 
from the fast disk or cassette load and save 
commands. The disk turbo boasts an 
increase of five times normal loading 
speed and the cassette clocks in at 10 
times normal speed. This was the point at 
which I discovered that, although my disk 
drive worked tolerably well at normal 
speed, the turbo speed was too much and 
misloads occurred. A tape head align- 
ment tape is provided with the package so 
had no problems there, it’s a pity that a 
similar facility was not provided for disk 
drives. Fortunately | have access to an 
alternative 1541 which proved man 
enough for the job, At least this cartridge 
merely supplements the existing 
commands which can still be accessed by 
using standard syntax so my old drive was 
still usable at normal speed 

The best addition is the MERGE 
command which offers a simple way to 
assemble prepared subroutines into a 
program already in memory, but the 
COPY commands come a close second, 
simplifying transfer of programs to and 
from disk, turbo tape or normal speed 
tape. Although a small point, it would be 
nice if the producers of turbo tape 
systems would include a boot program 
which would allow turbo tapes to load on 
any system without the cartridge. This 
would limit inconvenience if the cartridge 
is damaged in any way. 

Another niggle is the fact that FILE 
NOT FOUND js replaced with the 
message LOAD ERROR: which caused me 
a little confusion. 

The cartridge also adds toolkit 
commands such as auto numbering, 
selective renumbering and deletion of 
program lines, Added to this are three 
very useful commands: PLIST, TRACCE 
and FIND, The first lists the current 
program to the screen one page ata time 
and TRACE displays the current line in full 


at the top of the screen as the program 
E slowly runs. FIND will locate a variable, 


command word or string wherever it lies 
in program memory and list the relevant 
lines to the screen. 

Unfortunately, TRACE must either be 
used throughout the program or be used 
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to run a small section which uses no 
variables. This is because using TRACE is 
like using RUN — all stored variables are 
cleared. it would have been better to 
devise a system where the trace auto- 
matically takes over from the normal run 
speed at a specified line. 

HELP is also a debugging command 
which will automatically list a line in 
which an error has occurred and try to 
indicate the fault. If more serious 
problems occur and the computer 
rashes it is a simple matter to press the 
reset button and use OLD to restore the 
program in memory. This command can 
also be used if you accidentally NEW a 
program. 

Other commands allow conversions 
between HEX and DEC numerical systems, 
cause all the keys to REPeat, turn off the 
activated function keys, switch out the 
cartridge, set the border and screen 
colours, SHOW all the commands 
available or RESET the computer. 

Printer commands allow Centronics 
printers to be driven by the 64 and listing 
of programs is achieved by using the 
‘CENT command to select the correct 
mode and then using normal syntax to 
open the file and LIST. Two of these 


modes cause the special characters (for 
colour, cursor positioning etc.) to be 
printed out in a more readable form, 
similar to the listings in this magazine. 

The final section held within this 
amazing little package is the machine 
code monitor which must be transferred 
into memory by typing MON followed by 
the Hex location. The location can lie 
anywhere between $0800 and $9FFF but if 
$C000 to $CFFF is preferred this can be 
done by dumping the monitor into any 
part of memory, switching off the cart- 
ridge using QUIT (because this occupies 
the area of memory we wish to use) 
entering the SYS command to activate the 
monitor and then using the Origin 
command to transfer it up to $C000. 

The monitor itself has no surprises in 
store. Assembly, disassembly, trace, 
relocation, ASCII screen dumps and 
searches are all catered for, as well as disk 
commands. 

The package of a toolkit/monitor with 
turbo commands and an azimuth 
alignment tape offers good value for 
money and | particularly like the fact that 
the turbo is optional. Now how about a 
disk alignment program on a turbo 
cartridge? 
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“DRAGONSKULLE”, “OUTLAWS”, “BLACKWYCHE”, “IMHOTEP” recommended retail price 
£9.95 inc VAT. Available from W.H.SMITHS, BOOTS, J.MENZIES, WOOLWORTHS 
and all good software retail outlets. Also available from 
ULTIMATE PLAY THE GAME, The Green, Ashby-de-la-Zouch, Leicestershire LE6 5JU 
(P&P are included) Tel: 0530 411485 
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In a new series, Daryl | 
[Bowers shows you the] 
[techniques for writing 
lyour own arcade 

game. mA 


RIGHT, STOP IDLY FLICKING 
through this magazine and get 
typing! I'm going to show you 
how to put together an arcade 
game piece by piece, a section 
in each issue of the mag. Each 
part will add to the original 
Until the game is complete. 

This is not a lesson in howto 
program in machine code - 
there are several good books 
available - and if it was, |would 
need the whole magazine for 
12 months. Instead, itshows the 
application of Machine Code 
on the C64, and how to 
approach the creation of an 
entertaining masterpiece! The 
routines that follow can be 
taken from this game and used 
in any of your own. 

To give you an idea of the 
complexity of the game, it took 
about a week to write and 
debug - so see what can be 
achieved with relatively little 
work, 


The Game 


You play the part of a poor, 
helpless giant frog! There 
you are hopping down the 
Toad, minding your own busi- 
ness, when suddenly you find 
yourself being chased by amad 
Frenchman on a bicycle, 
hoping to catch some dinner! 
To make matters worse, you are 
feeling pretty tired and there 
are pitifully few juicy flies 
about - and, while you're 
catching one, you have got to 
watch out for low flying birds. 
‘Oh! and don’t forget to 
avoid the puddles! They make 
jumping very hard work. 


The First Part 


In this first ‘building block’, | 
have provided the sprite data 
for the frog and an input 


program that will be used in 
future parts. 

Type in the basic program, 

and enter the start address: 


12800. There are 512 bytes of 
sprite data, and the checksums 
are at the end of each line. If 


i i SS — |; 


19 REM HEX LOADER 


20 IF H$="999" 
169 FOR 


107 


230 S¥S 65466 
240 POKE 780,LENCF$) 
250 POKE 782,156:S¥S 


140 Y=¥-48:1F 453 THEN Y= 
15@ POKE F+I.x#16+4:CH=CH+X#LE+Y 


2G REM 

3@ INPUT "START ADDRESS" 
4@ INPUT "NO. OF BYTES "iN 
5@ FOR F=A TO A+N-1 STEP & 
60 CH=O 

7@ PRINT F: INPUT "3 "jHE 


THEN F=F-8:GOTO 7@ 
90 IF LENCH$)<>16 THEN 7@ 


110 X=ASI NSE gee 


“GFS 


168 NEXTI 

17@ PRINT" "CH 
188 NEXT F 

208 INPUT "FILE NAME 
210 FOR 


=1 TO LENCF$2:POKE 39999+1 .ASCOMIDS$(FS$, 1,199 :NEXT 
220 POKE 786,8:POKE 781,8: 


'POKE 781,64 


65469 


26@ POKE 252, A-(256#INT(A/256)) :POKE2S3. INTCA/256) :POKE 788,252 
278 POKE 781,F-(256KINT(F/256)) :POKE 782, INTC‘ 


2563'SYS 65496 


you make a mistake, type 999 
and retype the last line. Save 
the data under the name 
‘FROGDAT’. (If _using tape 
change line 220 to read: POKE 
780,1: POKE 781,1 etc). 


The Code 


OK, now you've got the data in 
for the jolly hopping frog, it’s 
time to look at the program. 
You will, of course, need an 
assembler, and if you haven't 
got one already you can typein 


Mach 1 which started in the 
November issue. 


In this section we have 
some mind-boggling routines, 
starting with the routine to 
print the frog: ‘PRFROG’. The 
variable ‘stage’ holds the 
current position in the X and Y 
co-ordinate table: ‘XTAB’. This, 
table governs the relative 
positions of the two. sprites 
which go to make up the frog. 
There are two types of jump, 
high and low, and this is 


indicated by a one or zero in 
the variable ‘JUMPTYPE’. One 
last table is used, ‘SPTAB', 
which indicates which sprite 
definitions are used and at 
what point in the jump. 


The X register is used to 
index into the tables and 
retrieve the current values. (To 
see what each of these values, 
does, it is helpful to look at 
pages 320 to 334 of the Program- 
mer’s Reference Guide) 


10 
2 
0 
40 
50 VARS 

60 XTABL 
10 

80 XTAB2 
90 

| 100 YTABL 
| 110 

120 YTAB2 

130 

| 140 STAGE 

} 150 YTABIB 
i 180 
| 


170 

180 XTAB2B 
190 

200 

210 YTABLB 
220 

230 

240 YTAB2B 
250 

260 

770 SPTAB 
280 

290 SPTABZ 
300 

‘10 TEMPL 
‘320 DELAY 
330 RESTORE! 
‘340 RESTORE2 
‘350 COLTAB 
‘340 ROTAB 
Bi) 

380 

390 CLOUD 
400 cLoup2 
410 CLOUDS 


«BYTE 
BYTE 
= BYTE 
«BYTE 
«BYTE 
BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
»BYTE 
+BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
BYTE 
+BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
BYTE 
«BYTE 
«BYTE 
BYTE 
«BYTE, 
«BYTE 
«BYTE 
BYTE 
«BYTE 
BYTE 
«BYTE 
«BYTE 
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184, 184, 184, 184, 184, 184, 184, 194 
184, 184, 184, 184, 184, 184, 184, 184 
13b, 136, 134, 134, 136, 136, 136, 136 
134, 134, 136, 136, 140, 140, 140,140 
156, 156, 156, 156, 134, 132, 130,128 
124,122, 124, 126, 156, 156, 156, 156 
154, 15b, 156, 156, 156, 154, 152, 150 
130,128, 130, 132, 150, 150, 150, 150 
) 


184, 104, 184, 184, 184, 184, 184, 184 
184, 184,104, 184, 184, 184, 184,184 

184, 184, 184, 184, 184, 184, 184, 184 

13b, 136, 134, 136, 136, 13h, 136, 136 

13b, 136, 136, 136, 136, 136,136, 136 

134, 136, 136, 134, 140, 140,140,140 

156,156, 156,156, 134, 132, 130, 128 

12b, 124, 122) 120, 118,116,114, 112 

112,114, 118, 124, 156, 156,156, 156 

156, 156, 156, 156, 156, 154,152, 150 

148, 144, 144,142,120, 118, 116, 114 
114,114,120, 124, 150, 150, 150, 150 

200,200,200, 200,202,202, 202,202,204, 208, 204, 204 
206,206,204, 206 

200,200,200, 200, 202,202, 202,202, 202,202,202, 202 
204,204,204, 204, 204, 208, 204,204,206, 20 

) 
1 
235 
200 
1,1,1,1)1,44454,45450,9,940)0,0505151,150,0,0)0,0 
180, 160, 160, 160, 140, 140, 160, 140, 160, 140,32,32,32 
32,32,22, 12, 32,32) 22, 160, 160, 140, 160,160, 140,160 
160, 160, 160, 32,32,32,32,32,32, 32, 32,32, 3; 

32,32, 171,171,171, 171,171, 
32,171,271, 171,174,171) 171,171, 171, 178,32 
171,171,171, 171,171,171, 1714171, 171,171,171 


The second awe-inspiringly 


complicated routine (try saying 
that 10 times quickly!) is 
‘MVFROG’, which if you 
haven't guessed, moves the 
frog! When jumping, a 
different speed is used 
between movements in order 
to make the long jump longer, 
and the two values of delay are 
stored in ‘RESTORE’ and 
‘RESTORE2’. At. this stage, 
however, this difference is 
irrelevant because everything 
is happening too quickly, and 
will continue to do so until we 
have introduced some more 
routines. 

This routine follows the 
steps shown in FLOWCHART1. 
The variable ‘NXTJUMP’ 
contains the type of jump to be 
introduced next, and this will 
be altered when the joystick 
routines are added. 

Finally, the last routine 
INIT’ wi sets up various 
parameters for the game. This 
routine is called whenever the 
game starts, and is self 
explanatory. 

The variables at the start of 
the listing are all the variables 


| required for the whole game, 


therefore in future we shall 
have room for more routines. 
In the next part we shall 
introduce a multi-purpose 
raster interrupt handling 
routine, and more routines 
with long names. 

Now that you have got the 
code in, it’s time to try it out. 
Assemble it and find out the 
address of ‘START’. This is the 
start of the program, and 
should be $2329 (9001) if you've 
typed in the variables and 
tables correctly. If not check 
them over again. Reset the 
machine and load in your 
object code (assembled source 
code). Now load in your frog 
data - FROGDAT - and SYS 
9001. Bingo! (Don’t tell me it 
doesn’t work - | wrote it and it 
does...so check your source 
code, dummy.) 

For further information on 
Machine code and the C641 
suggest Programming the 6502 
by Rodney Zaks (! know it costs 
a tenner, but | assure you it's 
worth itif you'reserious), anda 
Programmer's Reference 
Guide is pretty essential - (I 
never knew there was so much 
in itl). 


Now get typing. 


420 
430 BLONGL 
440 
450 
460 
470 
480 BLONG2 
490 
500 
510 
520 
530 
540 
‘550 
560 


570 

740 BLONGTAB 
720 

730 

740 

750 

780 

770 

780 CLCOUNT 
790 CLSPEED 
800 JUMPTYPE 
810 NXTJUMP 
820 JOYSTATUS 
830 BLONGSTAGE 
840 BLDNGTYPE 
850 BLONGPOS 
840 MVLOOP 
870 STATI 
880 STAT2 
890 CRATER 
900 RDTYPE 
910 RDTYPE2 
920 CRATEDEL 
930 CRATEDEL2 
940 RANDTAB 
950 

960 

970 

780 

990 

1000 RANDTABS 
1010 

1020 

1030 

1040 RANDPOS 
1050 FRENCH 
1060 FRENCH? 
1070 FREPRT 
1080 FROEL 
1090 BIKEMV 
1100 
1110 
1120 BIKEPOS 


= 
36 
= 


«BYTE 


BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
BYTE 
BYTE 
«BYTE 
«BYTE 
«BYTE 
= BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
BYTE 
BYTE 
«BYTE 
BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
«BYTE 
BYTE 
BYTE 


32, 32,32, 32, 32, 32,32, $A0,32, 32 

$A0, $0, $80, $20, $A0, $40, $0, $80, $80, 32 
$A0,91,$A0,91, $A0,91, $20, 91,$20,32 
‘$0, $80, 32, $40, $40, $A0, $80, $A0, $40, 32 


32, $00, 32, $0, 32, 32, 32, 32, 22,32 

32, $A, 32, $A0, 32, 32, 32,32, 22,32 
$A0,$A0, $40, $00, $40, $A0, $80, $0,880, 32 
'$A0, $80, $A0, $R0, $40, $0, $80, 32, $40, 32 


0,0,1,0,0,2,0,0,0,2,1,0,0,2,1,2,0,0,2,1,0, 255 


METERS : 00000 LIVE! 
SCORE + 00000 Food 


80,60, 108,74 

20,0,48, 14 

2 

10 

$FF, 80,80,0, 70,70, 1,50,80, $FF,S5,90,1,55,80, $FF,20 
80 


1,65, 90, SFF,60,90,0,70,50,1,50,80, $FE 
0 


1130 BIKEDEL 
1140 BIKEDIS 
1150 FLYDEL 
1160 FLYXHT 
1170 FLYXLO 
1180 FLYKOVE 
1190 FLYSPD 
1200 WINGFLY 
1210 FLYWDEL 
1220 WINGBRD 
1230 BROWDEL 
1240 BRODEL 
1250 BROXHT 
1260 BROXLO 
1270 BRDMOVE 
1280 BROSPD 
1290 FLYPOS 
1300 BROPOS 
1310 LIVES 
1320 FOOD 
1330 METERS 
1340 SCORE 
1350 METDEL 
1360 NETSPD 
1370 METDEL2 
1380 DED 
1390 ONLY 
1400 RDDEDEL 
1410 TABIK 
1420 NXTHUN 
1430 TABNOV 
41470 START 
1480 

1490 

1500 MLOOP 
1510 

1520 

1530 

1540 

1550 

1590 

1660 PRFROG 
1890 

1700 

1710 

1720 

1730 

1740 

1750 

1780 

1770 

1780 

1790 

1800 DEFSET 
1810 

1820 

1830 


*00000" 


110,10, 10 


JSR INIT 


sNAIN LOOP 


JSR PRFROG 


JSR NVFROG 
IMP LOOP 


LDA JUMPTYPE 
‘BNE BIG 
LOX STAGE 
LDA XTABL,X 
STA $0000 
LDA XTAB2, x 
STA $0002 
LDA YTABI,X 
STA $0001 
LDA YTAB2, x 
STA $0003 


Loa sPraB, x 
STA $07F@ 
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1840 Tar ase FLOWEHART 1 2920 STA $0400,x 
1850 INK 2930 STA $0500, 
1860 STX $07F9 — 2940 STA $0600, 
1870 ; 2950 STA $04F7, x 
1880 AIS 2960 DEX 
1890 3 2970 |NE LOOP2 
1900 BIG UX STAGE 2980 ; 
110 LOA XTABIB, x 2990 SET UP SCREEN COLOURS 
1920 STA $0000 3000 ; 
1930 LDA ¥TAB2B, x 3010 Loa #800 
1940 STA $0002 3020 STA $B 
1950 ‘LDA YTABLB, X 3030 LDA #$08 
1960 STA $0001 3040 STA SFC 
1970 LOR YTABZB, x 3050 LD #800 
1980 STA $0003 3060 LOOPS 
1990 LDA SPTAB2, X 3070 Loy 4927 
2000 STA $078 3080 LDA COLTAB, x 
2010 Tat 3090 LOuPS 
2020 IN 3100 STA ($FB),Y 
2030 STx $07F9 310 ney 
2040 i 3120 BPL LOOPS 
el ATS as 3130 Lon $F8 
0 ; ar 3140 Le 

2140 NVFROS DEC DELAY 3150 ADC #828 
2150 BNE EX! 3160 STA SFB 
2160 INC STAGE 3170 LDA SFC 
2170 LDK STAGE 3180 ADC #800 
2180 LDA JUNPTYPE 3190 STA $FC 
2190 BNE LARGE2 = 3200 IN 
2200 LDA RESTORE! 3210 CPX #25 
210 STA DELAY 2610 STA $0025 3220 ‘BNE LOOPS 
2220 CPx #16 2620 Loa 46 3230 ; 
2230 BNE EXt 2630 STA $0029 3240 ;SET UP ROAD 
240 IMP RESET 2640 Loa 40 3250 : 
2250 LARGE2 2650 STA $D02A 3260 Loy #827 
2260 Low restore2 | 2660 STA $0028 3270 LOOPS 
210 STA DELAY 2670 sta spo20 3280 LOA ROTAB,Y 
2280 CPX 424 Be ” he 3290 STA $06D0,Y 
2290 NE 3300 Dey 
2300 RESET Lox a 2700 i 3310 BPL LOOPS 
2310 STX STAGE ait sENABLE SPRITES 3320 ; 
2320 LA NXT; 2 i 3330 DRAW CLOUDS 
2330 STA were 2730 LR ASF 3340 ; 
2340 STK NXTJUMP Bee STA $0015 3350 Ut 110 
7350 EXt 2780 sSPRITE MULTICOLOURS! 3340 Logpg. 
2340 RTS 270 3 3370 LDA CLOUDI, x | 
pasta 7800 Loa #167 3380 STA 1064,X 
2510 ; 2810 STA SDOLC 3390 LDA CLOUD2, x 
7520 jINITIALISE a i S400 aes 
STATUS Ba SPRITE EXPAND 410 LDA CLOUDS, x 

: i 3420 STA 1144, 
a SePALTE ‘COLOURS 2850 LOA #63 3430 DEX : 

H 2860 STA $D01D 3440 SPL LOOPE 
2350 Una #5 2870 STA $0017 i 
2560 Sta $0027 2380 . ae i cE | 
2570 STA sp02 lL R 
an es 8 2890 LOX #800 ‘470 RTS 
2540 sas 200 Lode 3480 FINISH : 
2400 nid oy EDRiE20) 3490 END | | 


eee eee 
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EXPERIENCE 
SyNDROMIC 
NSIC 


| The SIEL range of computer music hardware 
and software can turn your Commodore 
64/128 into a synthesizer, hame entertain: 
ment keyboard or MIDI controller. 
The SIEL CMK 49 allows you complete 
control over the CBM 64's SID chip while the 


12880 ‘BaBBeAReREoROeGe CH ‘ GHGREGBAB2ABZ2AAA 
12808 ‘BonGenBEREBAABAa = CH S82AAREARARABFAA 
2! goonbeRgZEaGR02ZRa CH “ RARBAAAARBAAARSO 
@2ZAR6SARAREARARA =H: ARARSSAARAG BAZAR 
BFARARASFARARSAE = «CH i PeREZsG0R028R00R 
ARAGAERAAGEBARS& = CH ‘' 2egngazeaneEzBaa 
ABAASGRARASECOGA = CH ga2aoRsRRggRR009 
6 ‘GQAGBABAASBASBB2 CH ‘gagaeRaRgRoR0RF7 
‘meAnaeEnEeneeeee = CH aogogEgaasggooeA 
CH ageaeaszagRRaZeR 
CH BAGRGG0G2ZARGGGRRA 
Q CH SGSGRABSBZARBBES 
2ABBAGZFaBBAZAGG = CH ‘ASBBORAGBOZARSAaR 
GOZARGOOZABGRBOF CH ‘ 2ABBBaRsERazAA0R 
GAGGZABBGGRAGGAS CH SAZRRR82RaR8a28a0 
CH: ‘BGRaBagasZaagaar 7 
BAA CH ARBOOGRABSSBARSS 
S82AARERZARABFAR CH SOAASBGGARSAGGAAR 
“ARRBARARAGARAAS CH + ABQBERROBGARRAAAG 
lal CH * BARRE 8 BAARERRARA 
CH + BFBARAASaZAARAS 
CH ‘ARBGGBAABRBB2ER 
CH ‘Be28ERRggga0090R 
BesogoRERHOnBag2 CH: 258 13240 : aonoozqqRa02! 

BbRRR20900020000 CH: 4 13248 : 98B8GGR02RAG0 
a CH 13256 ‘ AAGB2ZBAABBBARABS 
CH 13264 ‘ AREAGAZEARRGSZABA 
IAGO 2000 CH : 13272 ‘B8GBAAGSBRREGSO2 
RAGES 2ARGABAA CH 13280 ‘ EAGSBZABGSHORRGS 
a CH 13298 + GBAReSAoRoeseRoR 
13546 :g2eoagae! pagea206 CH 13296 ‘sageRanoRARAGAOG 
13848 ‘gag20a0gg2000002 CH 13304 ‘gagggggggRgg00F7 

om 
4 \Y 
Sew | 
% RPE elicits 7 


# Sound Buggy 
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‘Sound Buggy 


is 1S 4 NEW CONCEp! in computer based m 
for all the family. Featuring fully. programm 
sounds and thythms. one tinger and fingered | 


Music 


can supply these 
separately by direct mail or if you purchase 
rc 


SIEL Sound Buggy lets you control an 
entirely new sound chip for a more superior 
sound! 

All SIEL instruments may be added to with 
new software or hardware, both the CMK 49 
and Sound Buggy can have a MIDI interface 
connection which allows you to control other 
keyboards and synthesizers, 

Justexpand your system when youwantto! 
Playing Keyboards 

Hot off the presses, this book takes you 
gently through playing keyboards like the 
Sound Bugoy wiCMK 49. Written by Roger 
Evans and Vince Hill, the book comes 
complete with lots of easy lessons, playing 
hints and music including Flashdance and 
Hello. You can also use the book wilh a 
tuition cassette making your learning even 
simpler. | 


7 3t the mcred ble price o| £199.00! 

‘new musical experience Please fill out the coupon below and return it 
MK 48 Keyboard yalh your payment to, Syndramie Music, 35a Grove 
The CMK 49 5.2.49 note top quality keyboard with Avenue, London N102ASorring 01883 1938 
ull size keys. 

NAME. 

ADDRESS. 

| would like to order the following: Quantity 

SIEL Sound Buggy = — DiskiCassette a 999.95 

SIEL CMK 49 = Disk/Cassette m £12500 

THEPACKAGE!!! — —_DiskiCassette m — £199.00 

Playing Keyboards — Book &Cassette @ = £5.45 

Playing Keyboards = — — Bookonly w £395 


Mote iformation 
All prices are inclusive of VATIpostagelpackingiinsurance 
Lenclose cheque/postal orderimoney order for & made payable to Syndromic Music 
I paying by Access please quote card number and sgn here: ACCESS CARD fey 
wT ELT [SDT Ta Seale 
Please alow 21 days for dalvery 


A Flash Of , 
Genius! 


THE NEW 64 MULTIMODEM 


GIVES YOU DATABASES, BULLETIN . 
BOARDS, ELECTRONIC MAIL, 
PRESTEL — ALL ON YOUR 
COMMODORE 64 OR 128 


Atlast! The perfect modem for your 
Commodore* 64 or 128, giving you 
access to Prestel*, Micronet” , viewdata 
and a host of other services — plus 
user-user communications. 
It couldn't be simpler. The 64 
Es Multimodem has autodial and 
‘autoanswer, with all comms 
software on-board in ROM. 64 Multimodem fits 
your Commodore's cartridge port, and has just 
one external connection — the telephone 
lead. 
The 64 Multimodem is menu driven and 
multispeed, with CCITT V21/23 and Bell 
103 standards, handling baud rates of 
300/300, 1200/75 and 75/1200. 
Functions include save and 
O zit frame and automailbox 
with edit and save. 
O fis your 64 Multimodem now and 
we'll give you free introductory 
subscriptions to Micronet and 
Microlink *: an unbeatable package 
at an unbeatable price — it’s pure 
genius! 


Approval applied for 


From the Communications 
pis, Powerhouse 


mM S MIRACLE 


4 rage marks ofthe companies concerned. 


TECHNOLOGY 


MIRACLE TECHNOLOGY (UK) LTD STPETERSSTREET IPSWICH IP11XB ENGLAND 
(0473) 216141 6 LINES TELECOM GOLD 79: KEY 001 (Dealerlink 72: DTB 10135) 
946240 CWEASY G 19002985 PRESTEL MAILBOX 919992265 


rE 


Have you always fancied 


getting on-line? Well 


Micronet 800 will help you 


with this month’s 


competition. 


WOULD YOU LIKETO BECOME PART OF 
the electronic revolution? Do you fancy 
being able to send messages to your 
friends via a telephone? Well this month 
Micronet 800 is offering £1000 of prizes to 
help 54 readers of Your Commodore to 
get on line. 

A large number of different prizes are 
being offered 
1st prize is a Commodore modem and 1 
year’s free subscription to Micronet and 
Prestel 
2nd prize is 1 year's free subscription to 
Micronet and Prestel 
3rd prize is 6 month's free subscription 
4th prize is a quarter's free subscription. 


Plus there are prizes for 30 runners up 
of £10 worth of some of the latest 
Commodore software. 

A further 20 readers will receive a 
selection of software that is available on 
Micronet 

So as you can see there are plenty of 
prizes up for grabs and everyone stands a 
chance of winning, 


How to enter 


On the competition entry form you will 
find five different things that are available 
on Micronet. All you have to do is put 
them into the order that you think is most 
important. For example if you thought 
that telesoftware is the most important 
then you would put a number 1 by the 
side of it. 

When you have done this you then 
have to complete the sentence given in 
no more than 15 words 

Then put your entry form into an 
envelope and write the order of 
importance on the back 


The Rules 


Entries will not be accepted from 
employees of Argus Specialist Publica- 
tions and Micronet 800. This restriction 
also applies to employees’ families and 
agents of the company, 

The How to Enter section forms part of 
the rules. The editor's decision is final and 
no correspondence will be entered into. 
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Lignt Fantastic 
Monopole 54 
Quick Disk 
Supermon 64 


Entry Form 


Name! iressedeg 
Address .. 


Number these services in order of importance 
Electronic mail 


International Telex 

‘Chatlines 

News 

Complete the following sentence in less than 15 words: 
Micronet 800 is the ultimate peripheral because ....., 


Send to: Adventure Competition, Your Commodore, No 1 Golden Sq, 
London W1R 3AB. Write clearly and fully and don’t forget to put the 
numbered order on the back of your envelope. Closing date: 31 fanuary 1986. 
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demonstrates random 


access on the 1541. 


ONE OF THE PRIME BENEFITS 
of having a disk drive is the 
ability to access information 
both sequentially and by 
random access. Most of you 
will have used simple files such 
as sequential and relative files. 

Sequential files are messy to 
use since, if you want only a 
portion from the middle of the 
file, you must first load the 
earlier unwanted portion 
Relative files offer greater 
power in that you can use a 
record pointer to access a 
specified portion; but all 
records must be the same 
length to compensate. 

The alternative approach is 
to use random. access. This 
method, used by most 
advanced programs, appears 
rather daunting because you 
need to develop an operating 
system to manage it. However, 
in reality it is easy to use for 
simple storage systems, 

In this short article | plan to 
explain the basics of random 
access and describe the 
command available to use it 
These principles will be 
illustrated by two example 
programs, The first is a storage 
system for adventure data and 


the second a simple filing 
system. Much of the informa 
tion here is given in the 
handbook accompanying the 
disk drive but the treatmentis a 
little obscure and the worked 
examples of little use. 

When formatted, floppy 
disks have a number of 
concentric strips or tracks. On 
the 1541 there are 35 such 
tracks. Each track is sub- 
divided into sectors, The 
number of sectors varies 
depending on the position of 
the track. The outermost track 
holds 21 sectors and the 
innermost 17. Each sector 
holdds 256 bytes of data. 

The random access 
commands allow you to store 
and retrieve data from these. 
sectors. All you need to do is 
keep track of which data lies 
where. The examples given in 
this article deal with the simple 
case of records of 256 bytes ie. 
one per sector. Longer records 
require an operating system to 
remember where they are 
kept. This is generally 
necessary in more sophisticated 
data bases. 

Before describing the 
syntax of the commands, | will 
explain some abbreviations. | 
will use the following system of 
shorthand: 

File Number—FN. 
Device Number—DE 
Track Number—T 
Sector Number—S 


Channel Number—CH 
Buffer Number—BN 
Buffer Pointer—P 
Driver Number—DR 

The commands to. mani- 
pulate data at this level reside 
in the disk drive so a system 
must be adopted to access 
them. Data communication is 
performed by means of data 
buffers in the drive. You can 
either specify a buffer or ask 
the DOS (Disk Operating 
System) to select one for you. 
The buffer is triggered by 
opening a data channel by use 
of one of the commands: 


OPEN FN,DE,CH,” BN’ — 
‘Opens a channel to buffer BN 
OPEN FN,DE,CH,” "—Asks 
DOS to choose a buffer 


For example: OPEN 
2,82,” 3"—Opens data 
channel 2 using buffer 3 
OPEN 28,2,” "—Opens data 
channel 2 to any buffer 


Disk commands must be 
accessed via channel 15 in a 
manner similar to those for 
formatting the desk etc. The 
command to open this channel 
is, for example: 


OPEN 15,8,15 


You may only work on data 
a buffer so more than one 
step must be carried out. First 
you must load or save data in 


the buffer and this must then 
be stored or retrieved from the 
buffer. Manipulation of data in 
the buffer is handled with 
PRINT and GET commands. 
In a manner similar to relative 
files, a buffer pointer is 
available to specify the byte 
manipulated. The command to 
use the pointer has the syntax: 


PRINT 15,"B-P"CH,P 
e.g. PRINT 15,"B-P2,133 


The example assumes data 
channel 2 is open and sets the 
buffer pointer to byte 133. If 
you were to perform GET 2,B$ 
after this command byte 133 
would be loaded into BS. 
Similarly PRINT 2,B$ would be 
byte BS into the buffer at 
position 133. 

The bulfer is read from disk 
or written to disk by the block 
read and block write com- 
mands, Block read is 


PRINT 15,""B-R"CH,DE,1,5 


©, to read sector 3 in track 6 
from channel 2 to drive 0 use: 


PRINT 15,"B-R"'2,0,6,3 

Block Write is 

PRINT 15,"B-W"CH,DE,T,S 
e.g. to write buffer to sector 6in 
track 2 from channel 2to drive 


0 use 


PRINT 15,"B-W'"2, 


That is all you need to dé 
the job. Unlike other files, the 
tracks and sectors to which you 
write are not protected from 
‘overwriting. To prevent this 
danger, the area must be 
reserved in the BAM (Block 
Availability Map) by use of the 
block allocate command. 


PRINT 15,”B-A:”DR;T;S 
To deallocate a block use 


PRINT 15,”B-F:"DR;T;S 


Even if you dovallocate your 
data, the use of the Validate 
command will deallocate it, so 
be warned! 

One final tip —always open 
the two channels early in your 
routines and don’t forget to 
close them when you've 
finished. To see the use of all 
these commands look at the 
two listings. 

The first listing is a simple 


REMUSEEEAREEES HAAS ANNETTE 
REME TINY-FILE ' 
REKE 1 
40 RENE AEW 1985 
50 REMS 1 
0 REMAEEEAAAteeEAateReaettTe 
70 REM 
75 POKESS260, 12:F1 B11! 
80 PRINTCHRS(147)" Sk F 
90 PRINTCHRS(17)TAB(14) "1. SAV 
100 PRINTTAB(14)*2, READ DATA 


data filer for adventures and isa 
logical follow-on from my 
short series on adventures, 
published earlier this year. The 
routine assumes that you want 
to save location descriptions or 
messages up to 255 characters 
long, Each message is therefore 
stored in its own sector. The 
first 17 tracks can be used, each 
with 21 sectors giving storage 
Up to 357 strings. The track and 
sector corresponding to any 
given string is easily calculated 
as in lines 112.and 212. Option 1 
reserves the first five tracks. 
Line 30 can be altered to 
reserve up to 20 tracks, Option 
2saves the strings and options 3 
recalls them. The strings are 
terminated by ' ' which acts as 
a sentinel to warn the routines 
to stop. Lines 215-260 can be 
used in your adventure to 
recall and print a string. 
Tiny-File in listing 2 uses a 
similar approach. Each sector 
holds one record of 256 bytes. 


*RINTCHRS (147) ;CHRS(144) 
TLER V1.3 A WEBB 1985" 
IE DATAY 


INTTAB(L4)"3. SET UP DISK™ 


Each record is terminated by 
’. A record can be split into 
fields by carriage returns but 
the whole record is still only 
one string 
Option 3 performs three 
functions 
1, Formats the disk 
2. Block allocates the first 20 
tracks 
3. Stores’ ‘in eachsector inthe 
first 20 tracks 
A sector holding just 
regarded as a null record 
Option 1 allows the entry of 
a record, You will be prompted 
for each field and you should 
terminate a field by pressing 
RETURN. The data base was 
originally written to store the 
contents of disks. Each 
program on a disk was a field 
and the complete disk was a 
record 
Option 2 allows you to 
examine a specified record. 
Output to printer is available. 
Option 4 performs a simple 


ENFL=1 
350 IFFL=1THENOPENS, 4 


340 PRINTCHRS (147) *RECORD #*5DN 


‘376 PRINT* COOWNICONTENTS: * 
380 IFFL=1THENPRINT#S, "RECORD! 
2 *2PRINTHS 

390 T=INT(DN/20): 

400 PRINTHIS, "B-P"2; 

410 PRINTALS, " 

$20 GET#2,08: 1FOS: 

430 PRINTO! 
440 IFP<256THEN420 


2G0SUB 1010:P=P+1sPRINT#IS, * 


Programming 


search for a specified character 
pattern in a record. For 
example, assume that record 5 
holds the fields: 


GORILLA 
GIRAFFE 
LION 


A search for GIRAFFE will 
step through each record in 
turn until record 5 is searched. 
The search will then stop. The 
search would also find GIR or 
AFFE, You can easily use the 
data base to save addresses 
where the fields could be: 


NAME 
ADDRESS, 
PHONE NUMBER. 


1 hope that by studying 
these listings you will grasp the 
ideas behind random access. | 
don’t claim that these 
programs are complex or in any 
way amazing — they simply do 
a job in a simple manner. 


IN: PRINT#4: PRINTA4, "CONTENTS 


P°2,P 


*) PRINTTAB(14) "4. SEARCH” 
30 GETI$: 1F18¢*1"0RIS)"4°THENL3O 
149 ON VAL(IS) GOTO 170,310,540, 740 
150. REM 
180 REM 
170 GOSUB930 
180 OPERI5,8, 15 
190 OPEN2,B,2,"#" 
200. T=INT(DN/20) sS=DN-1120:T=T#1 
210 PRINTAI5, "B-P' 
0 PRINTA2, OF 
230 PRINT#LS, "B-W"250,1,8 
240 GOSUBIGO 
250 CLOSE2:CLOSEIS 
260 POKE7B1, 1: POKE782, 5: POKE7B3, 0: SYS65520 
270 PRINTCHRS (18) "PRESS ANY KEY TO RETURN TO MENU 
280 GETIS: IFI$="*THEN280 
230 607080 
300 REM 
310 OFENLS, 8,15 
320 OFEN2, 8, 
PRINTCHRS (147): INPUT*RECORD #";DN 
PUT*OUTPUT TO PRINTER (Y/N); 18: IFIS=*V°TH 


450 IFP=1THENPRINTCHR$(18)CHRS(17) "NULL RECORD": 1FFL=1THENP 
RINT#4, "NULL RECORD" 

480 IFFL=1 THEN PRINT#4:PRINT#4, " 

470 POKE7@1,21:POKE782, 5:POKE783, 0:SYS65520 

480 PRINTCHRS (18) ;*PRESS ANY KEY TO RETURN TO MENU" 

490 GOSUBIEO 
00 CLOSEL 
510 BETIS: 
520 607080 


FL=1THENCLOSES 
HENS 10 


550 INPUT “DISK NAHE"; NAS 

560 INPUT "DISK 1.D,*;1D$:ID$=LEFTS(ID$, 2) 
+105 

570 PRINTCHRS(17)CHR$(17)*ARE YOU SURE? (Y/N)* 
580 GETI$: IF1$<)*Y"ANDIS<>*N*THENSEO 

590 IFI$="N*THENO 

600 OPEN15,8, 15,08 

610 OPEN2,8,2, 

620 PRINTCHRS(147)*THIS WILL TAKE 3 10 4 MINUTES*CHRS(17) 


ND: NAS 


psmsere, 


630 PRINT*GIVING ROOM FOR ABOUT 350 RECORDS." 

640 PRINT*THE REMAINDER OF THE DISK NAY BE USED FOR NORMA 

| PROGRAM STORAGE" 

650 PRINTCHRS (5) CHRS (17) * SEUWARNINGESS* 

660 PRINTCHRS(17)CHRS(144)" ANY ATTEMPT TO VALIDATE THE DI 

SK MAY" 

470 PRINT" 

680 PRINT#LS, 

690 FORT=1T017 

700 PRINT#LS, 
PRINT#2,08 

730 PRINTHL5, *B- 

740 NEXTS,T 

750 CLOSE2:CLOSE15:607080 

760 PRINTCHRS (147): INPUT*FIELD NAME*;FIS 

770 OPEN15, 8,15, 

780 OPEN2, 8,2, "#*:FORDN=1703 

790 T=INT(DN/20) 

800 PRINTCARS (147) *RECORD 

810 PRINTALS, * 

820 PRINT#LS, "1 

830 GET#2, 08: IFO 


ERASE THE DATA BASE": 0$="( 


(OSUB63300:PRINT"S 1. ALLOCATE BLOCKS 1" 
SGOSUBESI00:PRINT"t 2, SAVE BLOCKS 8" 
INT" 3, READ BLOCKS 8" 
RINT SSAA ANSE EAEE EAN AEET” 
TCHRS (5) 2 =¥#2: X=13: G0SUB63300;PRINT*SELECT OPTION":P 
RINTCHRS (144) 
§ BETIS: 1FIS<*1*ORI$)*3*THENG 
10 ONVAL (181607012, 90,200 
OPENS, 8,15 


40 PRINTALS, *B-A*0;T35 

50 GOSUBE3000 

52 }SUB63300: 

53 Y=22:GOSUB63300:PRINT*TRACK"T" SECTOR'S 

60 NEXTS,T 

70 CLOSEL5:CLOSE2: 60701 

80 REM 

81 REM 

90 GOSUB30000 

96 T=INT((HN) /20) 

100 OPENI5,8, 15 

110 OPEN2,8,2,"8* 

M11 FOR MN=1T03 

112 T=INT( (HN) /20) 

115 PRINTHIS, *B-P" 

12 05UB67300: PRINT" a 
OSUBE3300:PRINT*WRITING MESSAGE"HN * TO TRACK 

"T* SEC 

140 PRINTA2, O$ (MN) 

160 PRINT#L5, "B-#"230,1,8 

170 GOSUB63000:NEXT 


Programming 


860 FORJ=1T0 LEN(MS)-LEN(FIS) 

870 IFFIS=HIDS (NS, J, LEN(FIS)) THENPRINT: PRINTCHRS (18) "FILE F 
OUND": PRINT:PRINTHS:6 

or0910 

880 NEXTI 

890 NEXTON 

910 CLOSE!S:CLOSE2 

920 600260 

930 of RINTCHRS (147): INPUT*RECORD #*;DN 

940 INPUT*FIELD NAME (% TO QUIT) ";FIS 

990 IFFI$="8*THENOS=0$+"@": RETURN 

960 OS=0$+FIS+CHRS(13) :6070940 

970 RETURN 

980 INPUT#15, EN, ENS,ET, ES 

990 POKE7B1 ,23:POKE782, 0:POKE7B3, 0:SYS65520 

1000 PRINTCHRS(18)*DISK STATUS: *;EN;EMS;ET;ES:RETURN 
1010 IFFL=1THENPRINT#4, 08; 

1020 RETURN 


180 CLOSE2:CLOSE15: 60701 

181 REM 

182 REN 

200 OPENI5,8, 15 

210 OPEN2,8,2,°#":P=1 

211 INPUT*MESSAGE NO"; MN 

212 T=INT((MN) /2! N-TH20¢ 

215 PRINTALS, " 

220 PRINT#15, "B-F 

230 GET#2, 0$: 1FOS="@" THEN260 

240 PRINTO: +1: PRINTALS, * 

250 GOT 

260 CLOSE2:CLOSE1S:END 

30000 0$(1)="STANDING BY A LOW BUILDING ON THE SLOPE OF AH 
TLL. A WHIPPET SITS * 

30010 O$(1)=08(1)+*NEAREY EATING A BOWL OF FOOD, 1T LOOKS L 
IKE RAIN. @" 

30020 0$(2)="WE"RE ENTERING A LONG WOODEN BUILDING. A RATH 
ER EVIL LOOKING * 

30030 0812) }+*TRANSVESTITE 15 SITTING IN A ROCKING C 
HarRe* 

30040 O$(3)="WE?RE ENTERING A HUGE CAVERN. A THIN MISTORIFTS 
FROM VENTS IN THE* 

30050 0$(5)=0$(3)+" WALLS. LONG 
E ROOF GIVING THE * 

30060 0$(3)=0$(3)+"ROOM A BIZARRE ATMOSPHERE, THE AIR ISCHIL 
(AND DAMP, THERE 1S* 

30070 0$(3)=0$(3)+" A NARROW TUNNEL ENTRANCE TO THE NORTH.@ 
39999 RETURN 

63000 INPUT#I5, EN, EHS, ET, ES 

63010 Y=23: 1=0: 60SUB63300: PRINT® 

63020 {0SUB63300: PRINTEN; EMS, ET; ES 

63030 RETURN 

63300 POKE7B1, ¥:POKE782, XPOKE7B3, 0:S¥S65520: RETURN 
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WIZARDRY 
The Edge £7.95 


THE CASTLES OF 
DOCTOR CREEP 
Ariolasoft_9.95 


SPY V SPY: THE ISLAND CAPER 


Beyond £9.95 


ESAS Se 


THOSE FIENDISH SECRET 
agents from the pages of Mad 
magazine are at it again. 

In the first Spy y Spy game 
they were restricted to 
searching a building but now 
they have been let loose on a 
volcanic desert island. This 
time the enemies mus 
find a hidden missile. Speed is 
of the essence because the 
volcano is due to erupt and 
cover the island in molten lava. 
As usual our heroes seem 
totally oblivious to the danger 
and are more intent on each 
other's destruction as they 
squabble for possession of the 
three parts of the missile. 

The most impressive feature 
of the game is the simultaneous. 


ACE, 
Cascade £9.95 


action screens. The display is 
laterally split and one spy is 
controlled in the top sector 
whilst the other scurries about 
on the lower display. 

Inventive as ever, the spies 
have discovered how to use the 
resources of the island to make 
destructive anti-personnel 
weapons, Coconut bombs, 
snares and. pits complement 
the natural hazards of 
quicksand and shark infested 
waters and the unnatural 
hazards of swordplay and 
gunfire. 

Central control is exercised 
by the skilfull use of the Trap- 
ulator which tells you what 
objects you are carrying, your 
current strength and the time 


ACE IS A SIMPLE SIMULATOR 
which involves a strategic war 
game and owners of aC-16 will 


AIR COMBAT 
EMULATOR 


already be familiar with the 
earlier version. 
You have to select the kind 


eft before the eruption begins, 
All functions are controlled by 
your joystick and you have to. 
be pretty dextrous if you are 
going to defeat the computer 
control option. 

At first | found it best to 
select the two player option so 
that | could practice digging 
pits and setting all of the other 
traps, as well as finding the 
missile parts and screwing 
‘them together, 

The fact that the other spy 
does not move makes it 
awkward when you both 
occupy the same bit of the 
island. Such is the rivalry of the 
two. spies that they would 
rather fight than search, Since 
both of these actions require 
you to press the fire button, 
you cannot search when you 
are together. This means 
moving, or killing, the second 
spy while you search his ‘home’ 
area, 

Once you have mastered 
the skills of the game, you are 
ready to compete. Each spy sets 
about the business of finding 
the missile parts and the neces- 
sary components for setting 
booby traps to slow down or 
eliminate his opponent. 
Coconut bombs, napalms, 
swords and guns can be used as 
found though some of the 
bullets in the guns may turn out 


of mission and the armaments 
which you think will be 
required. 

Getting into the airis simply 
a matter of attaining the correct 
speed, pulling back on the 
joystick and raising the 
undercarriage. Now you have 
to locate the enemy by con- 
sulting the map which shows all 
the advancing enemy forces. 

Using the joystick and 
screen display, it is an easy 
matter to set your course to 
intercept the enemy as long as 
you can read a compass. 
Occasionally switching to the 
map ensures that you're on the 
correct path. 

Refueling can be achieved 


to be blanks. Other traps have 
to be constructed. 

‘A pit can only be made if 
you find a spade and the pit can 
be more effective if itis turned 
into a punji pit by placing a 
sharpened stake at the bottom. 
Snares can be rigged up to 2 
palm tree if you ithe ropeto 
do it with and the unsuspecting 
spy will hang upside down 
from the tree for several 
seconds if caught. To add to all 
this nastiness, bombs and 
snares can be set over buried 
missile parts but remember my 
warning about the indiscri- 
minate nature of booby traps, 
and also remember to watch 
what your opponent is doing 
and where he is doing it. 

When all three parts of the 
missile are in your possession, 
you must locate your escape 
submarine which will surface 
off the island and then 
rendezvous with it by wading 
‘out to-sea, This can be difficult 
because you submerge and 
lose strength. Make sure 
you are feeling healthy enough 
to attempt it and jook out for 
sharks. 

The {sland Caper is 
‘extremely enjoyable to play 
because of the superb cartoon 
graphics and makes an 
excellent follow up to its 
predecessor. 


by either landing at an allied 
landing strip or by rendez 
vousing with a tanker in mid- 
air. Of the two, the tanker isthe 
trickiest because you have to 
match height and speed to hit 
the trailing refuelling nozzle, 
and that’s after you've found 
the wretched thing! 

Combat with the enemy 
relies on fast reactions, 
especially in air to air combat 
Everything seems inclined to 
fire back but with machine 
guns blazing and heat seeking 
missiles flying, the battle soon 
becomes so absorbing that you 
have to remember to keep an 
eye on your height and speed. 


WHO DARES WINS II 
Alligata £7.95 


eS 
. nH gosse0 


iN THIS GAME YOU MUST 
pretend to be a John Wayne- 
style one-man army as you fight, 
your way through eight battle- 
fields with guns blazing and 
grenades flying. 

You have volunteered for a 
suicide mission to liberate your 
lost comrades-in-arms from 
the clutches of the enemy. To 
do this means penetrating 


RED ARROWS 
Database Software 6.95 


deep into their territory and 
facing whatever problems they 
may throw at you, armed only 
with an eternally loaded rifle 
and a dwindling supply of hand 
grenades, Luckily, the enemy 
has left’ cases of grenades 
lying around which will replete 
your stocks. 

The enemy is always to the 
north (up thescreen) and once 


the screen scrolls up a line or 
two there is no going back. 

A‘ first the enemy only has 
the same weapons as yourself, 
but soon you start to face 
mortar fire and armed pill 
boxes, which can be overcome 
without the use of a grenade 
but a well-placed lob means 
life becomes much easier. 

Every now and then a 
prisoner is facing a firing squad 
and his freedom lies in your 
hands, A carefully aimed shot 
will despatch the guard and 
award a bonus mark, This is the 
theory but in practice | found 
that my litle barnstormer seemed 
to be of the opinion thata dead 
comrade tells no secrets and 
often the guard escaped while 
the prisoner performed his 
death throes pirouette! 

Physical barriers also cause 
problems. The soldiers onrush 
is punctuated by greedy ponds 
and quicksand, Negotiating a 
pathway through these 
obstacles, under fire, isdifficult 
but not as problematic as 
passing under the roads which 
criss-cross the landscape. 

Frequently a barbed wire 
border is guarded by a gun 
emplacement and if your 
soldier has used up all of his 


grenades, the only way to 
advance is to grit your teeth 
and charge. As you pass into 
the tunnel your soldier 
disappears from sight and 
careful manipulation of the 
joystick is necessary to avoid 
the incoming bullets. 

A successful charge inevit- 
ably brings you to the door of a 
sentry post which opens to dis- 
gorge a horde of troops under 
the command of an heroic 
captain who makes a bee-line 
off the screen to safety, If you 
can shoot him before he goes 
you are rewarded with a 
bounty of 1250 points, buteven 
this high bounty is sometimes 
worth sacrificing in the face of 
so many other troops homing 
in. 

If all this wasn't sufficient to 
keep you busy, an extra bonus 
can be scored by destroying a 

finghy escaping across a river 
and the occasional plane 
strafes its way across the screen. 

Once all the enemy has 
been killed you are allowed to 
advance to the next of the eight 
levels. Success. at level eight 
takes you back to the opening 
screen but the enemy has taken 
new heart and fights more 
ferociously. 


FLYING WITH THE RED 
Arrows must be the dream of 
many people. Now you can 
gain the experience on your 
C64. 

Unfortunately the reaction 
of the plane is very slow and 
clunky. 

Eight of the formations 
which the Red Arrows use in 
their displays are represented 
in the game and you are Red 8. 
This means that you can use 
your radar to shadow Red 9 
who is always in the mirror 
image position of your jet. 

Menus give a wide range 
of options to help you learn 
how to fly and each manoeuvre 
can be tackled individually 
until you feel ready to join ina 


full display. 

It is a pity that the screen 
display occasionally seems at 
odds with the action because of 
the slowness of the display. Itis 
such a good simulator in terms 
of facilities. Airbrakes, under- 
carriage, elevators, ailerons, 
rudder and thrust are all under 
your control but you can optto 
have some of the pressure 
taken off you by choosing an 
auto mode. 

The program is the only 
formation flight simulator 
available and as such will 
probably sell quite well, which 
is good news for the charities 
nominated by the Red Arrows 
to receive a share of the 
proceeds 


COLOSSUS CHESS 4 


CDS Software £9.95 cassette £14.95 disk 


Your nove? 


WITH THE WORLD CHESS 
championships taking place, 
interest in this game of mental 
stamina is keener than ever 
before. Usinga chess computer 
is probably the best way to 
learn the game and Colossus 
Chess 4 stop of the tree among 
those programs presently 
available. 

Chess without doubt, is the 
most skilfull game of them all, 
because there is no element of 
luck or chance. The best player 
should always win, Therefore, 


<C> 1985 
M. Bryant 


My move 
d4b2 


rN OUR VE 


when looking for a chess 
program, the one to choose is 
the one that makes youa better 
player and improves your 
game. A chess program also 
removes the problem of 
finding human opponents of 
your standard, 

Colossus 4 allows you to 
choose the strength of the 
computer's play by adjusting 
the time you allow it to think 
Out its moves, The longer you 
allow the machine to think, the 
better its moves become. 


KERMIT’S ELECTRONIC STORY MAKER 
Kids! £9.95 cassette £12.95 disk 


ALL THE MUPPET FAVOURITES. 
are included plus the real star 


of the 
banana. 


show, an animated 


The game is easy to play and 
the pieces easy to control, 
especially since a three 
dimensional board has. now 
been added. 

The program has a perfect 
understanding of all the rules 
including under-promotions, 
the 50 move rule and all draws 
by repetition. 

While waiting for the 
computer to move, you can 
observe its current thinking by 
pressing the space bar, see a 
hint move and have the 
computer's assessment of the 
state of play. 

Colossus 4 examines about 
300. positions per second. 
Whilst you are working out 
your move, it assumes your 
next move and works out its 
reply. However it only gets 
about one in three correct. 

You can set up full 
tournament mode, or speci 
an average time per move or 
even play a game against the 
clock. For postal chess players 
there is an infinite mode and a 
problem solving mode ~ to 
help with the chess problemsin 
the daily papers. 

The program has other 
useful features, such’ as: 
Allowing you to retrieve your 


The graphics are bright and 
some amusing combinations 
can be created with bouncing 
bathtubs in a bow! of soup. 

Sound effects and music 
can be added but one disad- 
vantage is that scenes are self 
contained and you can’t make 
a continuous story line. 

Once the child has worked 
through the wacky permuta- 
tions the program has limita- 
tions but as an introduction to 
new vocabulary and simple 
sentences Muppet-aided 
learning is a breezy alternative. 

If you are willing to entrust 
your child’s education to a 
showbiz amphibian turned 


position if you make a mistake 
(or want to cheat!) letting you 
play for either side, or watching 
the computer play itself. After 
the game you can watch an 
action replay, or your own 
victory or see where you went 
wrong, 

Those with masochistic 
tendencies can try out a game 
of invisible chess, 

One of the new features is 
the ability to set up quantity 
parameters. For experienced 
players, this makes the game far 
more interesting. Colossus also 
has a bank of about 300 
openings so you can try out 
many different tactics. Also the 
new “Draw score” allows you 
to make the computer try very 
hard for a win rather than 
settling for a draw as many 
programs do, 

{f you want a challenging 
game then try Colossus 4, 
although experienced players 
will find that they still have to 
allow a long time for moves to 
get a demanding game. 

However, if you own 
Colossus 2, then there is little 
point in changing over to the 
new version as the differences 
do not really justify the 
expense. 


academic and have him or her 
interacting with the likes of 
Gonzo to construct scenarios 
featuring flying bananas this 
could be the program for you. 
One drawback however, is the 
price, 

It's undoubtedly a slick 
package high on entertainment 
value but perhaps too 
restricted in educational terms 
to merit the price tag for cost 
conscious parents 

Personally | think this fun, 
fun, fun approach to the three 
R's has gone far enough. When 
is some visionary software 
house going to sign up Janet 
and John? 


six-four supplies company 


le, ke 


Print Hint 


Why is it that all computer magazines 
want a computer printout with any sub- 
mitted program? 

I write a lot of programs and would 
love to send some of them to you and 
hopefully have them published. 
However, | can’t afford a printer and 
therefore can’t get a printout of the 
program. 

Julie Smith, Newtownards 


I would like to make it clear that we don’t 
insist on every program having a listing 
with it, Please do send your programs to 
us anyway. 

The reason that we ask for a listing to 
be included if possible is so that we can 
judge how long the program will be when 
we print it. It also serves as a reference if 
we get any queries from people who type 
the program in 


Stay Sharp 


On reading the November 1985 edition of 
Your Commodore | was delighted to read 
Stuart Cooke’s comment stating that 
having joined forces with Your 64, you will 
be bringing us the best Commodore 
magazine around. 

Your 64 began its life as a practical and 
informative magazine. Its deterioration 
into an overpriced games review, 
seemingly written by children for 
children, was rapid! 

| have noticed with several, now 
defunct magazines, that the first stage of 
their decline was marked by an increase in 
games reviews and a corresponding 
decrease in informed editorial. 

The second stage was heralded by 
letters of complaint about the content of 
the later issues. The reply to these has 
become infuriatingly predictable - the 
favourite being “we can't publish if you 
don’t send us”. Editors would do well to 
remember that we pay for a magazine to 
inform us or entertain us, to provide us 
with a service. Customer participation is 
all very well but should not be to provide 
the material. 

| hope that Your Commodore 
continues to be a good read and does not 


SBREERENO HO aRother fab mag with fab 


games reviews, brill banter and high 
scores, 
Eric Pickering, Corwen 


1am pleased to say that Your Commodore 
will certainly not ‘degenerate into 
another fab mag’, in fact we hope that 
quite the opposite will happen. Our aim 
as an editorial team is to produce a well 
balanced informative magazine for those 
people who want to do more than just 
play games on their Commodore 
computer. 

As for your comment about 
submitting articles to the magazine, | am 
afraid that it is only too true of any 
magazine that ‘we can’t publish if you 
don’t send us’. You, the readers, are the 
ones that are discovering new things 
about your computers or writing 
programs that you think will be of use to 
other people. How can other people hear 
about these things if you don’t send them 
to the magazine? Don’t forget we do pay 
for all material that we use. 


Merger Moans 


Before Your Commodore and Your 64 
were joined | used to purchase Your 64. 
Looking through the new mag | was 
deeply shocked ~ | couldn't see anything 
‘on hints and tips, no cheats or POKEs also 
there was no software chart, 

When | glanced through the new 
magazine | noticed that most of the pages 
were given up to listings. Not that | mind 
listings, but is it really necessary to have 
that many or is it just a cheap way of filling 
up pages? 

| also noticed that you were giving 
away 10 Compunet modems, how about a 
feature on Compunet to go with them? 
Andrew Bailey, Horsham 


We get quite a number of letters and 
phone calls at Your Commodore asking 
for the POKEs for certain games so that 
you can be made indestructable or have 
infinite lives, 

Our feeling is that by entering these 
POKEs you are spoiling the game. Surely 
the whole point of buying a game is to try 
and solve the puzzles that the 
programmer of the game has set? If you 
are going to cheat, what's the point in 
buying the game in the first place? Unlike 
many other magazines we don’t publish 
maps of games either for exactly the same 
reason, 


Letters 


We do realise that we devote a large 
number of pages to listings. This is not a 
cheap way of filling up pages, in fact it is 
usually more expensive. The reason that 
we have so many pages of listings is quite 
simple. We aim to publish programs of as 
high a quality as possible, in fact most of 
our programs are of commercial quality. 
Obviously the better programsare usually 
the longer ones and this does take up 
space. 

We could reduce the amount of space 
that we give over to listings by simply 
publishing hex loaders for all the 
Programs. At the moment we publish 
both a loader and the assembly code. 
Many people prefer it this way since they 
can follow the program through and find 
out how it works. 

As for your question about Compunet. 
We do have a regular article on commun- 
ications called Communications Corner 
and we also have a number of pages and 
programs on Compunet. 


Letter from Oz 


I was reading through my back issues of 
Your Commodore when I came across an 
article in the May issue called Softrock. 

What do you mean by saying: “They're 
not bad for Aussies”. If you stopped 
whinging and looked around, you'd see 
that our country is 10 times better than 
yours. Also Rolf Harris is not the only 
musician of any note, he is hopeless, If 
you want good music then listen to the 
Models, Men at Work, Australian Crawl, 
INXS, Pseudo Echo, Midnight Oil and 
Icehouse among others, 


And, all Australians don’t play 
didgeredoos, so go stick a pork pie up 
your nose. 


When you make some decent 
software, get a decent cricket team and 
win the America’s Cup then you can start 
knocking other people. Tom Nash isdead 
meat. 

And you'd better publish this letter, 
unless it takes as long to get to England as 
your magazine takes to get here, in which 
case you'll never get it! 

Damien Marsh, Victoria, Australia (and 
proud of it!) 


We'd like to apologise to Damien and any 
other Australian readers who found this 
offensive. Our reviewers occasionally get 
a bit carried away. However we'd just like 
to point out that England now holds the 
Ashes! 


| 
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COMMODORE PLUS 4 AND C16 


CAN YOU MEET THE CHALLENGE OF:- 7“ 


| | 
| HIT & MISS IS THE CHALLENGE oa S 
BUT —THE QUESTION IS - 


CAN YOU MEET IT? \ 


FREE A2 POSTER. 

FREE PACKAGE & 
POSTAGE 

NEW - IDEAS IN ACTION 

ONLY — FOR PLUS 4/C16 , 


“MORE ADDICTIVE THAN 
ANY ARCADE GAME, THE 
ONLY C16/PLUS 4 SOFTWARE 
OFFERING A REAL 
CHALLENGE” 


Design by N 


IN ¥ oppeR vou 
HIT & MISS DEFINITELY ISA MIND CHALLENGE OFMEGA 1 REEMA.» wc roo. oS sm 
PART IN, FROM SINGLE PLAY TO DOUBLES IT WILL STRETCH YOUR NAME (BLOCK LETTERS). 
MENTAL DEXTERITY TO THE FULL....... 


BUT REMEMBER:— f Aponess 
\ \4 “IT-TAKES MORE THAN JUST GUESSWORK TO. 1 county FOSTCODE 
{ BECOME A GENIUS WITH HIT & MISS” ' Saeed 
PLEASE SEND MI (NES OF “HIT & MISS” AT 
| VENTUREGATE | ' £7.99 COMPLETE WITH A FREE POSTER WITH EVERY COPY. 


AVAILABLE AT MOST GOOD SOFTWARE OUTLETS. 1 (FREE A2 POSTER AND FREE P & P) 
1 


IN THE LAST THREE ARTICLES 
in this series ! have given all the 
initialisation and wedge 
routines needed to add extra 
commands to the Basic of aCé4 
computer. 

have also given the codeto 
add nine new commands to 
Basic. These are; CTL, APPEND, 
CHANGE, DUMP, FIND, 
AUTO, CHAIN, DELETE, and 
RENUMBER. This month | am 
adding a further three com- 
mands, they are; MAT, SORT, 
and VARPTR. 

These commands, unlike 
the previous ‘toolkit’ type 
commands, are used to 
manipulate and modify data 
arrays. Data manipulation 
commands like these can both 
save considerable amounts of 
Basic program code, and in 
addition have the added bonus 
of a considerably shorter 
processing time. All three new 
commands require that the 
wedge and initialisation code 
given in the first part of the 
series are present in memory at 
the correct locations, and that 
their command names and 
entry points are stored in the 
correct tables. These com- 
mands are independent of the 
previously added commands 
and can therefore be used 
without the previous routines, 
To ensure that you have the 
wedges and new routines 
correctly positioned, the Basic 
loader at the end of this article 
gives only the initialisation 
routines and the three new 
commands. The commands 
added in previous issues have 
been left out in order to keep 


the loader of a manageable 
size. All the programs used in 
this series are extracted from 
the book Advanced Com- 
modore 64 Basic Revealed by 
Nick Hampshire and published 
by Collins. 


MAT 


Abbreviated entry; M(shift)A 
Token: Hex $EE$11, Decimal 
238,17 

Modes: Program and direct 
Purpose: To perform  arith- 
metic operations on entire 
arrays, assuming their contents 
to be matrices. 

Syntax: MAT array name = 
(arithmetic expression). 
Assigns scalar value to all 
elements of the matrix in the 
array. Brackets are required 
around the expression. 

MAT array name = array name 
Assigns all corresponding 
elements from one array to 
another. Both arrays must be 
numeric and of the same 
dimensions. 

MAT array name = array name 
operator (arithmetic expres- 
sion). 

Or MAT array name = (arith- 
metic expression) operator 
array name. The operator may 
be + or * to add or multiply a 
matrix with a scalar value. 
MAT array name=array name+ 
array name. All three arrays 
must be of the same 
dimensions, and numeric. 
MAT array name=array name* 
array name. Array sizes must 
follow the convention for 
matrix multiplication ie, (ac) = 
(a x b)*(b xc). Where a,b,c are 
the array sizes in the DIM 
statement plus 1 (element 0) is 
used. 


MAT. COMMAND 


1000 jsnsnassasatestesessesses 
1010 ; 16 BIT UNSIGNED MULTIPLY 
1020 ;ateeneneeaesesesettaeteste 
1030 5 WAREA = NI NZ 

1040 ; 

1050 ML WOR 0 

1080 N2 .WOR 0 

1070 RESULT .WOR 0 

1080 ; 

1090 MHULT LDA 40 ;ZERO RESULT 
1100 STA RESULT 

1110 STA RESULT# 

1120 LDA N2 5 END IF N2=0 
1130. ORA N24 

1140 BEQ MMULT2 

1150 MMULT! LOA NL ;N = 0.2 
1160 ORA MLL 

1170 BNE KMULTS 

1180 MMULT2 RTS 

1190 MMULTS LDA #1 j1F BIT 0 OF Nt 
1200 AND NL ;THEN ADD N2 TO RESULT 
1210 BE MHULTA 

1220 CLE ;ADD X2 TO RESULT 
1230 LDA N2 

1240 ADC RESULT 

1250 STA RESULT 

1260 LDA NZ#1 

1270 ADC RESULT#L 

1280 STA RESULT+ 

1290 MMULTA ASL NZ ;N2 = NZ ¥ 2 
1300 ROL N+ 

1310 LSR NIL gL = NL / 2 
1320 ROR ML 

1330. IMP KAULTI 

1340 5 

1350 5 

1360 ; 

1370 ;aenenesneatatstereessnset 
1380 5 MATRIX ARITHMETIC 

1390 jtensensesesnesteeeeeanse 
1400 ; 

1410 ISNALF = $8113 


E 


ic 


979 
$73 
1440 VNANE1 .WOR O ;VARIABLE NAMES 
1450 VTYPE1 .BYT 0 
1460" VNAME2 WOR 0 
1470 VTYPE2 .BYT 0 
1480 VNANES .WOR 0 
1490 VTYPES .BYT 0. 
1500 FACK $ = $45 ; TEMP FLOATING STORE 
1510 FACT § = $45 TEMP FLOATING STORE 
1520 VSIZE1 .WOR 0 ;ARRAY SIZES 
1530 VSIZE2 .WOR 0 
1540 VSIZE3 .WOR 0 
1550 OPTYPE .BYT 0 ;OPERAND TYPE 
1560 VPTRI = $FB 
1570 VPTR2 = $FD 
1580 VPTR3 = $96 
1590 VSTT1 .WOR 0 
1600 VSTT2 WOR 0 
1610 VSTT3 .WOR 0 
1620 TL .WOR 0 
1630 T2 .WOR 0 


1670 WAT STA VNAMEL ;GET FIRST ARRAY 
1680 JSR ISNALF ;NAME AND CHECK 
1690 BCS CHOK ; LEGAL 

1700 KP $AFOB ; SYNTAX 

1710 CHOK LDA #0 

1720 STA VNAMEL+1 

1730 STA VNANE2+1 

1740 STA VNAMES+! 

1750 STA VTYPEL 

1760 STA VTYPEZ 

1770 STA VTYPE3 

1780 JSR CHREET 

1790 BCC CHOKL 

1800 JSR ISNALF 

1810 BCC EDVNA! ;60 CHECK FOR % § = 
1820 CHOKI STA VNAMEI+1 

1830 LNE JSR CHRGET ;SCAN PAST REST 
1840 BCC LNE ;0F VAR NAME 

1850 JSR ISNALF 

1860 BCS LNE 

1870 EDVNAL CHP 4°$ ;CHECK FOR STRING 
1880 BNE NSTRI 

1890 TYMISE LOX #22 

1900 JP $A437 ;TYPE MISMATCH 

1910 NSTRI CHP 8" 

1920 BNE NTINT1 ;NOT INTEGER ARRAY 
1930 DEC VTYPE1 ;SET TYPE FLAG TO SFF 


2000 
2010 
2020 
2030 
2040 
2050 
2080 
2070 


BNE NTEXP2 

JSR S$AEF1 EVAL. EXP. IN ( ) 
LDA $0D CHECK NUMERIC 
‘BNE TYMISE 

LOX #¢FACH ;FACHI TO FACH 
LDY #>FACH 

JSR SBBD4 

LDX #1 5 SET TYPE FLAG TO CONST 
2080 STX VTYPE2 

2090 JP CHKOP 

2100 NTEXP2 JSR ISNALF ;6ET NAME 
‘2110 BCS CHOK2 ;CHECK LEGAL 

2120 INP SAFOR ;SYNTAK 

‘2130 CHOK2 STA VNAME2 

2140 JSR CHRGET ;GET SECOND CHAR 
2150 BCC CHOK2A ;NUMBER ? 

2160 JSR ISNALF 

2170 BCC EDVNA2 ;CHECK FOR $ % 
2180 CHOK2A STA VNANE2+1 

2190 LNE2 JSR CHREET ;SCAN TO END 
2200 BCC LNE2 ;0F VARIABLE NAME 
2210 JSR ISNALF 

2220 BCS LNEZ 

2230 EDVNA2 CMP 4°$ ;CHECK FOR ’$? 
2240 BNE NSTRZ 

2250 LOX #22 5 TYPE MISMATCH 
2260 IMP $A437 

2270 NSTR2 CHP #"% ;CHECK IF INTEGER 
2280 BNE CHKOP 

2290 JSR CHRGET 

2300 DEC VIYPE2 ;SET INTEGER FLAG 
7310 CHKOP LOX #0 ;CHECK OPERAND TYPE 
2320. STX OPTYPE 

2330 JSR CHRGOT ;END STATEMENT ? 
2340 BNE NASSIE 

2350 IMP DOMAT 

2360 NASSI6 INC OPTYPE 

2370 CHP A$AA CHECK FOR ADD + 
2380 BEG GETV3 

2390 INC OPTYPE 

2400 CHP #$AB ;CHECK FOR SUB - 
2410 BEQ GETV3 

2420 INC OPTYPE 

2430 CHP SSAC ;CHECK FOR MULT ¢ 
2440 BEQ GETVS 

2450 JHP SAFOB SYNTAX 

2460 GETVS JSR CHRGET 

2470 CHP #"( sCHECK FOR ( EXP ) 
2480 BNE NTEXP3 

‘2490 LDA VTYPE2 ;CHECK TYPE2 FOR 
2500 CHP #1 ;BEING CONSTANT 

2510 BNE BEXPOK 


2580 
2590 
2600 
2610 


LOY #)FACH 
JSR $BBD4 
UDA #1 ;SET TYPE FLAG TO CONST 
‘STA VTYPES. 

2620 JSR CHRGOT ;END OF STATEMENT ? 
2630 BEQ DOMAT 

2640 SYNTE JNP $AFOB ;SYNTAX 

2650 NTEXPS JSR ISNALF ;GET ARRAY NAME 
2660 BCC SYNTE ;SYNTAX ERROR 

2670 STA VNAMES 

2680 JSR CHRGET 

2690 BEO DOMAT ; : OR END OF LINE 
2700 BCC CHOKS 

2710 JSR TSNALF 

2720 BCC EDVNAS 

2730 CHOKS STA VNAMES+1 

2740 LNES JSR CHRGET 

2750 BEQ DOMAT 

2760 BCC LNES 

2770 JSR ISNALF 

2780 BCS LNES 

2790 EDVNAS CMP #°$ 51S IT A STRING 
2800 BNE NSTR3 

2810 LDX #22 

2820 JAP $0437 

2830 NSTR3 CHP 47% 315 IT INTEGER 
2840 BNE NTINTS 

2850 DEC VTYPE3 

2860 JSR CHRGET ;NEXT CHAR 

2870 BEQ DOMAT 

2880 NTINTS JMP SAFOR ;SYNTAK 

2890 DOMAT LDA VTYPE! ;FIND ARRAY 1 
2900 BEQ VIREAL 

2910 LDA #128 ;SET HI BITS ARRAY NAME 
2920 ORA VNAMEL 

2930 STA VNAMEL 

2940 LDA #128 

2950 ORA VNAMEL+1 

2960 STA VNAMEL+1 

2970 VIREAL JSR FINDAR ;FIND ARRAY ADDR 
2980 STK VSIZEL 

2990 STY VSIZEL+ 

3000 LDA VPTRI ;STORE IT 

3010 STA VSTTI 

3020 LOA VPTRI+ 

3030 STA VSTTI+1 

3040 LDA VTYPE2 

3050 CHP #1 

3060 BEG GARS ; EXPRESSION 

3070 LDA VTYPE2 ;SET UP ARRAY NAME 2 
3080 AND #880 ;FOR SEARCH ROUTINE 
3090 STA TL 


1940 JSR CHRGET ;GET NEXT CHAR 2520 IMP $AFOB ;SYNTAX ‘3100 ORA VNAME2 

1950 NTINTI CHP #582 ; TOKEN FOR = 2530 BEXPOK JSR SAEFI ;EVAL EXP 3110 STA VNANEL 

1960 BEQ FOE 2540 LDA $00 3120. LDA VNAME2+1 

1970 IMP SAFOB ;SYNTAK NOT = 2550 BE NUMOK 3130 ORA TL > 
1980 FOEQ JSR CHRGET 2560 JMP TYMISE ;TYPE MISMATCH 3140 STA VNAMEL+1 

1990 CHP #"( ;CHECK FOR ( EXP. ) 2570 NUMOK LDX &<FACK :FACHL TO FACN 3150_JSR FINDAR ;FIND ADDRESS ARRAY 2 


Sere reccecerceec 


Programming 


The MAT command will thereby reduces the chances of DIM A(4,1) The matrix multiplication is 
only accept arrays of 1 or 2. anoutof memory error dueto FOR1=0TO 4 equivalent to: For matrix sizes 
dimensions, of only numeric the stack being full. As most FORJ=0T01 (ac) = (a xb) *(b xc). 
type and with not more than versions of Basicon mainframe READ A\(I,) 

255 elements in either computers have full matrix NEXT J)! DIM A(a-t, c-1), B(a-1, b-1), 
dimension. arithmetic this subset of the full DATA 0,4 ¢(b-1,c-1) 

Errors: Syntax error—whenthe MAT command will be useful DATA 3,5 MATA=B*C 

‘expression is not in brackets or in converting programs to run DATA -5,3.45 

an illegal operator is used. on the C64, Matrix arithmeticis, is the same as but faster than : 


Type mismatch - for string often used in programs 

arrays handling large amounts of < FOR 1=0T0 a 
Bad subscript - for arrays of numbers in linear equations. To print an array use aroutine FOR | =0TO c-1 
incorrect size etc. The routine uses the simple like: T=0 

Use: High speed matrix arith- convention thata matrix ofsize FOR! =0TO 4 FOR K=0TO ba 
metic is approximately eight a xb will be stored in an array FOR J=0TO1 T=T + BULK) * C(K,I) 
times faster than an equivalent dimensioned by DIM A(a-1, b- PRINT A\(1,)), NEXT K 

Basic subroutine. Using this 1), This means that a routine to NEXT J AGI) =T 

command also saves the use of read a 5 x 2 matrix from data PRINT NEXT J 

nested FOR...NEXTloops,and_ statements would be: NEXT I NEXT | 


3160 STX vSIZE2 3570 ASSEN LDA #1 3980 ORA RESULT# 

3170 STY VSIZEZ+1 3580 CHP VTYPE2 3990 BNE ASLOOP 

3180 LDA VPTRI 3590 BEM ASSIC 4000. RTS 

3190 STA VSTT2 3600 IMP ASARAR 4010 5 

3200 LDA VPTRI¢L 3610 ASSIC LOX #5 ;ARRAY =CONSTANT 4020 ASARAR LOX #5 ;SET VAR LENGTH 
3210 STA VSTT2+ 3620 LDA VTYPEL 4030 LDA VTYPEt 

3220 GARS LDA OPTYPE ;ARRAY 3. ? 3630 BEO ASSRI 4040 BEO ASRIR 

3230 BEQ DOMATA ;NO ARRAY 3 3640 LDA ACFACH ;FACH TO FACHL 4050 LOX #2 

3240 LDA VTYPES 3650 LOY #>FACH 4060 ASRIR STX VTYPEL 

3250 CHP #1 515 IT A CONSTANT 7660 SR $BBAZ 4070 LOX #5 

3260 BEG DOMATA ;YES 3670 JSR SBIBF ;FLOAT TO FIXED 4080 LDA VTYPE2 

3270 AND #$80 ; IS ARRAY 3 INTEGER ‘3680 LDA $64 ;STORE INT IN FACH 4090 BEG ASR2R 

3280 STATI 3490. STA FACH 4100 LOX 42 

3290 LDA VNANES 3700 LDA $65 4110 ASR2R STX VIYPEZ 

3300. ORA TH 3710 STA FACKH 4120 LDA VSIZE1 COMPARE ARRAY SIZES 
3310. STA VNAKEL 3720 LOK #2 4130 CHP VSIZEZ 

3320 LDA YNAMES#1 3730 ASSR1 STX VTIYPE2 ;STORE ELEMENT LENGTH 4140 BEQ ASRSOK 

‘3330 ORA TL 3740 LDA #0 ;CALC NUMBER OF ELEMENTS 4150 ASRSUB LDX #$12 ;BAD SUBSCRIPT ERROR 
‘3340. STA VNANEL+ 3750 STA NI+L 4160 JKP $A437 

3350 JSR FINDAR ;FIND ARRAY 3 3760. STA NOH 4170 ASRSOK LDA VSIZEL+1 

3360 STX VSIZES 3770 LDA VSIZE1 4180 CHP VSIZE2+1 

3370 STY VSITES+ 3780 STA ML 4190 BNE ASRSUB ; ERROR 

3380, LDA VPTRI 3790 LOA VSIZEL+1 4200 LOA VTYPEL ;ARRAYS SAME TYPE 2 
3390 STA VSTTS 3800 STA N2 4210 CHP VTYPE2 

400 LDA VPTRI+! 3810 JGR MMULT ;RESULT =NI 1 N2 4220, BNE ABRIR ;NO 

SHO STA VSTTSe 3820 JGR TRPT! ;COPY POINTER TO ZERO PAGE 4230 LDA #0 ;CALC SIZE OF ARRAYS 
3420 DOMATA LDA OPTYPE ;SET A JUMP VECTOR 3830 LOY 40 4240 STA NIL 

3430 ASL A jFOR OPERATION 3840 ASLOOP LOX 40 FACH TO ARRAY 4250. STA N+ 

u40 Tar 3850 ASLOP LDA FACH, x 4260 LOA YSIZEL 

3450 LDA OPITAB, X 3860 STA (VPTRLD,Y 4270 STAN 

3440 STA OPJKP 3870 INK 4280 LDA VSIZE1+1 

3470 LDA OPITAB#L, x 3880 INC VPTRE 4290 STA N2 

3480 STA OPINPHL 3890 BRE ASKC 4300 JSR MRULT 

490 IMP (OPIMP) 3900 INC VPTRIFL 4310. LOA RESULT 

3500 5 3910 ASNC CPI VTYPEZ 4320 STA NL 

3510 OPJMP .WOR 0 ; JUMP VECTOR 3920 BNE ASLOP 4330 LOA RESULTH 

3520 OPJTAB .WOR ASSEN ; JUMP TABLE 3930 LDA RESULT 4340 STA NI+ 

3530 WOR ADDSUB 3940 BRE ASNC? 4350. LDA VTYPEL 61 
3540 WOR ADDSUB 3959 DEC RESULTHL 4360. STA N2 
3550 WOR MULT 3960 AGNC? DEC RESULT ;ARRAY FILLED? 4370 LDA 40 > 

3540; tt MAT AA = C 3970 LDA RESULT 4380 STA -N2H 


1 


4390 


4400 JSR TRPT2 ;SET POINTERS TO ARRAYS 


4410 


4420 ASSTLO LDA (VPTR2),Y ;BLOCK MOVE OF 


4430 
4440 
4450 
4460 


JSR NMULT 
Loy #0 


STA (VPTRI),Y ;LENGTH IN RESULT 
INC VPTRI 

BNE ASSTNI 

INC VPTRI+1 


4470 ASSTNL INC VPTR2 


4480 
4490 


BNE ASSTN2 
INC VPTR2+1 


4500 ASSTN2 LDA RESULT 


4510 
4520 


BNE ASSTNS. 
DEC RESULT#+H 


4530 ASSTNS DEC RESULT 


A540 
4550 
4560 
4570 


LDA RESULT 
ORA RESULT+1 
‘BNE ASSTLO 
RIS 


4580 ASRIR LDA #0 


4590 
4600 
4610 
4620 
4630 
4640 
4650 
4660 


STA NI+1 

STA N21 

LDA VSIZEL 

STA NI ;CALC NUMBER OF ELEMENTS 
LOA VSIZEL+1 

STA N2 

ASR MMULT 

ISR TRPT2 


4670 ASRLOP LOY #0 


4680 


LOX #0 ;ARRAY ELEMENT TO FACH 


4690 ASRLPL LDA (VPTR2),Y 


4700 
4710 
4720 
4AT30 


STA FACN, X 
ING VPTR2 

BNE ASRNC2 
INC VPTR2+1. 


4740 ASRNC2 INK 


4750 
4760 
4770 
4780 
4790 
4800 
4810 
4820 
4830 
4840 
4850 
4840 
4870 


CPX VTYPE2 

BNE ASRLP1 

CP a5 

BNE ASRITR 

LDA AKFACM ;FACH TO FACEL 
LOY #FACK 

JSR $BBAZ 

JSR $BIBF ;FLOAT TO FIXED 
LDA $64 

STA FACH 

LDA $65 

STA FACKEL 

IMP ASRTM ;FACK TO ARRAY 


4880 ASRITR LDA FACM 


4890 
4900 
4910 
4920 
4930 


LDY FACKEL 
JSR $8391 ;FIXED TO FLOAT 
LOX 4<FACH ;FACH TO FACH 
LOY #>FACK 
JSR SBBD4 


4940 ASRTH LOY #0 


4950 


LOX #0 


4960 ASRTMI LDA FACH, x 


4970 STA (VPTRL),¥ 

4980 INK 

4990 INC VPTRI 

5000 BNE ASRNCI 

5010 INC VPTRIF 

5020 ASRNC! CPX VTYPEL 

5030 BNE ASRTHI 

5040 LDA RESULT 

5050 BNE ASRTHS 

5040 DEC RESULTS! 

5070 ASRTIS DEC RESULT 

5080 LDA RESULT 

5090 ORA RESULT# 

5100 BEG ASREXT 

S110 UMP ASRLOP 

‘5120 ASREXT RTS 

5130 ; 

5140 ; FIND ARRAY 

5150 FINDAR LDA $2F START OF ARRAYS 
5160 STA VPTRI 

5170 LDA $30 

5180 STA VPTRI+1 

5190 FALOOP LDA VPTRI ;CAP, END OF ARRAYS 
5200 CHP $31 

5210 BNE FACONT 

5220 LDA VPTRI+1 

5230 CHP $32 

5240 BNE FACONT 

5250 LOX #812 ;BAD SUBSCRIPT ERROR 
5260 JSR $0437 

5270 FACONT LOY #0 

5280 LDA (VPTRL) ,Y sFIRST CHAR OF NAME 
5290 INY 

5300 CHP VNAMEL 

5310 BNE FANAR ; TRY NEXT ARRAY 
5320 LOA (VPTRI),Y 

5330 CP UNAREL + 

5340 BED FAGETS 5 GET ARRAY DATA 
5350 FANAR INY ;FIND NEXT ARRAY 
5360 LDA (VPTRI),Y 

5370 STA TL 

5380 INY 

5390 LDA (VPTRI),Y 

5400 CLC 

S410 ADC VPTRIC 

5420. STA VPTRI+1 

5430 LDA TL 

5440 CLO 

5450 ADC VPTRI 

‘5460 STA VPTRI 

5470 BCC FANC 

5480 INC VPTRI+1 

5490 FANC INP FALOOP 

‘5500 FAGETS LDA #1 ;GET ARRAY DATA 
5510 STA Ti+ 

5520 INY 

5530 INY 

5540 INY 


‘5550 
5540 
‘5570 
5580 
‘5590 
5400 
5610 
5620 
5630 
5640 
5650 
5660 
5670 
5680 
5690 
5700 
5710 
5720 
5730 
‘5740 
5750 
5740 
5710 
5780 
5790 
5800 
5810 
5820 
5830 
5840 
5850 
5860 
5870 


LDA (VPTRI),Y 

CHP #3 

BHI FANDOK 

FAE1 LDX #812 ;ERROR MORE THAN 2 DII 
IMP $R437 

FANDOK TAY 

INY 

LDA (VPTRI),Y 

BNE FAE1 ;FIRST DIM TOO BIG 
mW 

LOA (VPTRI),Y 

STA TL 

THA 

DEX 

‘BEG FAEX ;ONE DIM ARRAY 
WY 

LDA (VPTRI),Y 

BNE FAE1 ;SECOND DIM TOO BIS 
In 

LOA (VPTRI),Y 

STA Ti+! 
FAEX INY 

TYa 

cle 

ADC VPTRI 

STA VPTRI 

LDA VPTRI+1 

ADC #0 

STA VPTRI+1 

UX TL 

LOY The 

RTS 


5880 ADDSUB JSR ORDER ;PUT CONST LAST 


5890 
5900 
510 
5920 
5930 
5140 
5950 
5960 
5970 
5980 
5990 
6000 
6010 
6020 
6030 
6040 
6050 
6060 
6070 


6080 ABSC JSR TRPTS ;COPY POINTER TO Z PAE 


6090 
6100 
6110 
6120 


LDA VSIZE1 ;CHECK ARRAY SIZES 
STA NI 

CHP VSIZE2 

BNE ADBADS 

LDA VSIZE1+1 

STA N2 

CHP VSIZE2+1 

BNE ADBADS 

LDA VTYPE2 ;V2 CONSTANT ? 
CHP #1 

BEQ ABSC 

LDA VSIZE2 ;V3 IS ARRAY 

CHP VSIZES. 

BNE ADBADS 

LDA VSIZE2+1 

CHP VSIZE3+1 

BEQ ABSC 

ADBADS LDX #$12 ;BAD SUBSCRIPT 
IMP $0437 


LDA #0 ;CALC NO, OF ELEMENTS 
STA N41 
STA N2+1 
JSR MMULT 


Programming 


6130 ABSLOP JSR V2TOT2 ;V2 TO (T2) 
6140 JSR VSTOFI ;V2 TO FACE 
6150 LDA 12 

6160 LOY T2+ 

6170 LOX OPTYPE 

6180 CPX #1 

6190 BNE DOSUB 

6200 JSR $BB47 ; (A.Y) + FACH 
8210 INP ABFA 

4220 DOSUB CPX 42 

8230 BNE DOMULT 

4240 JSR $B850 ; (A. Y)-FACHL 
6250 JAP ABFA 

6260 DOMULT JSR $BAZB ;(A.Y) # FACHL 
6270 ABFA JSR FITOV ;FACH TO Vi 
6280 LDA RESULT ;CHECK ALL DONE 
6290 BNE ABKC 

4300 DEC RESULT# 

6310 ABNC DEC RESULT. 

6320 LDA RESULT 

4330 ORA RESULT# 

6340 BNE ABSLOP 

6350 RTS 

6360 5 

6370 ORDER LDA VTYPES ;V2 CONST 
6380 CHP #1 

6390 BNE ADV2NC 

6400 LDA VTYPE2 ;SWOT V2 & V3 
4810 STA VTYPES 

#420 LOR vsizez 

4430 STA VSIZE3 

4440 LDR VsIze2+t 

8450. STA VSITES#1 

$460 LOR VSTT2 

4470 STA YSTTS 

6480 LDA VSTT2+1 

6490 STA VSTT3+1 

4500. LOA #1 

4510 STA VTYPEZ 

4520 ADV2NC RTS 

4530 ; 

4540 TRPTS LDA VSTT3 ; COPY POINTERS TO 
46550 STA VPTR3 ;ZERO PAGE 

6560 LDA VSTT3+1 

4570 STA VPTR3+1 

580 TRPT2 LDA VSTT2 

4590 STA VPTR2 

4600 LDA VSTT2+1 

S610 STA VPTRZH 

4820 TRPT1 LDA VSTTL 

4630 STA VPTRI 

$640 LDA VSTTI+1 

S650 STA VPTRIFL 

4460 RTS 

4610 

6680 V2T0T2 LDA VTYPE2 ;¥2 TO FACEZ 
4490 BEO V2RA 

$700 BAT V2INT 


6710 
6720 
6730 


LDA §CFACM ;FACN TO FACEZ 
LOY #)FACH 

STA 12 

6740 STY T241 

6750 RTS 

6760 V2RA LDA VPTR2 ;V2 TO FACE2 
46770 LDY VPTR2+1 

6780 STA 12 

6790 STY T2#L 

6800 LDA #5 

6810 V2BPT CLC ;BUMP VPTR2 

6820 ADC VPTR2 

6830 STA VPTR2 

6840 LDA VPTR2+H 

6850 ADC #0 

6860 STA VPTR2+ 

6870 RTS 

6880 V2INT LDY #0 ;FIXED TO FLOAT 
6890 LDA (VPTR2),¥ ;THEN FAC TO FACE 
6900 TAX 

6910 INY 

4920 LDA (VPTR2),¥ 

6930 TAY 

6940 TXA 

6950 JSR $B391 ;FIXED TO FLOAT 
6960 LOX ACFACT ;FACHL TO FACT 
6970 STX 12 

6980 LOY #FACT 

6990 STY T2+1 

7000 JSR SBBD4 

7010 LDA #2 

7020 BNE V2BPT ;60 BUMP VPTR2 
7030 V3TOF1 LDA TYPES 

7040 BNE VSINT 

7050 LDA VPTR3 ;V3 TO FACHL 
7060 LOY VPTR3#1 

7070 JSR $BBAZ 

7080 LDA #5 

7090 VSBPT CLC ;BUMP VPTRI 

7100 ADC VPTRE 

7110. STA VPTRS 

7120 LDA VPTR3#1 

7130 ADC 40 

7140 STA VPTR3+1 

7150. RTS 

7160 VSINT LDY #0 ;6ET V3 

7170 LDA (VPTR3),Y 

7180 TAK 

7190 INY 

7200 LDA (VPTR3),Y 

7240 TAY 

7220 THA 

7230 JSR $B391 ;FIXED TO FLOAT 
7240 LDA #2 

7250 BNE V3BPT ;60 BUMP VPTRS 
7260 FITOVL LOA VTYPEL ;FACHL TO V1 
7270 BNE VLINT 

7280 LOX VPTRI 


7290 LDY VPTRI+1 

7300 JSR $BBD4 

7310 LDA 45 

7320 VABPT CLC ;BUMP VPTRL 

7330 ADC VPTRI 

7340 STA VPTRI 

7350 LOA VPTRI+ 

7360 anc 40 

7370 STA VPTRI+1 

7380 RTS 

7390 VLINT JSR SBIBF ;FLOAT TO INT 
7400 LOY #0 

TAO LDA $64 

7420. STA (VPTRI),Y 

7430 LDA $65 

7440 INY 

7450 STA (VPTR1),Y 

7460 LDA #2 

7470 BNE V1BPT 

7480 ; 

7490 MULT LDA VTYPE2 jCHECK FOR MULT. 
7500 CHP #1 ;ARRAY BY CONSTANT 

7510 BNE MERR 

7520 GADS JMP ADDSUB 

7530 MERR LOA VTYPES 

7540 CHP At 

7550 BEO SADS 

7560 LDA VSIZEI+1 CHECK ARRAY DIN. 
7570 GNP VSITE2+1 

7580 BNE AAERR 

7590 LDA VSIZE1 ;CHECK NOT SAME ARRAYS 
7600 CHP VSIZE3 

7610. BNE AAERR 

7620 LOA ysizE2 

7630 CMP VSIZE3+1 

7640 BNE AAERR 

7650 LDA VSTTI 

7640 CHP VSTT2 

7670 BNE NSARRO 

7680 LDA VSTTI+1 

7690 CHP VSTT2+1 

7700 BEQ ARERR 

7710 NSARRO LDA VSTTL 

7720 CHP VSITS 

7730. BNE AASOK 

7740 LDA VSTTI+1 

7750 CMP VSTT3+1 

7760 BNE AASOK 

7770 ARERR LDX #$12 ;BAD SUBSCRIPT ERROR 
7780 IMP $A437 

7790 ARSOK JGR TRPTS ;COPY POINTERS TO 2. P, 
7800 LDA #0 
7810 STA Ni+1 
7820 STA N2#1 
7830 UDA HL 
7840 STA ROK 
7850 STA NROW 
7860 STA COL 


E 


c 


[7370 


1000 SORT JSR $0079 ;GET 1ST CHAR NAME 
1010 STA CA ;STORE IT 

1020 JSR $0073 ;6ET 2ND CHAR 

1030 PHP 

1040 ORA #880 ;SET HIGH BIT 

1050 STA CB ;STORE IT 

1060 PLP ;NULL 2ND? 

1070 BEQ SORTOO ; YES 

1080 
1099 OMP SORTOL 

1100 SORTOO LDA #880 

1110 STA CB 

1120 

1130 SORTOL LDA $2F SET POINTER 
1140. STA $22 5 TO ARRAY 

1150 LDA $2F+1 

1160 STA $2241 

1170 ; 

1180 SORTO2 LOA $22 ;END OF ARRAYS? 
1190 CHP $2F+2 

1200 BNE SORTOS ;NO 

1210 LDA $22+1 

1220 CHP $2F+3 

1230 BNE SORTOS ;NO 


JSR $0073 ;CHARGET FOR NEXT COMMAND 1340 
1350 


1250 JMP SORT21 

1260 5 

1270 SORTOS LDY #800 

1280 LDA ($22),Y 

1290 CHP CA ;NANE CORRECT? 
1300 BNE SORTO4 ;NO 

1310 IN 

1320 LDA ($22), 

1330 CHP CB 

BEQ SORTOS ;YES 


1360 SORTO4 LDY #$02 ;ADD LENGTH OF ENTRY 1620 


1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 


LDA ($22),Y ; TO POINTER AND 
STA TEMP ; CHECK NEXT 
INy 

LOA (822),Y 

STA TENP#1 

cu 

Loa $22 

ADC TEMP 

STA $22 

Lon 92241 

ADC TERPH 

STA $2241 

BCC SORTO2 ; ALWAYS 


LOA #5 ;CALC LENGTH OF V2 ROW 8180 JSR V3TOFL j6ET Vi 8490 STA VPTR3+ 
7880 LOX VTYPE2 ; - 1 ELEMENT 8190 LDA 12 8500 INC COL 
7890 BEQ AA2R 8200 LDY T2+ 8510 CLC 
7900 LDA #2 8210 JSR $BA2B ;(A.Y) § FACHL 8520 LDA V2COLP 
7910 AA2R STA NI 8220 LDA 4<FACH 8530 STA VPTRZ 
7920 STA TI 8230 LOY #>FACH 8540 ADC 11 
7930 LOX VSIZE2+1 8240 JSR $B867 ;(A.¥) + FACE 8550 STA V2COLP 
7940 DEX 8250 LDA ROW 8560 LDA V2COLP+! 
7950 TXA 8260 CHP VSIZE2 8570 STA VPTR2+1 
7960 STA N2 8270 BEQ ENDCOL 8580 ADC #0 
7970 JSR MMULT 8280 INC ROW 8590 STA V2COLP+! 
7980 LDA RESULT ;STORE IT IN LLV2 8290 LOX #<FACH 8600 JP AALOP 
7990 STA LLV2 8300 LOY #)FACH 8610 ENDROW LDA NROW ;ALL ROWS DONE ? 
8000 LDA RESULT#+ 8310 JSR SBBDA ;FACH! TO (X.Y) 8620 CHP VSIZEL 
8010 STA LLV2+1 8320 LDA VPTR2 ;V2 PTR DOWN 1 ROW 8630 BNE NEAA 
8020 AALOOP CLC ;MAIN LOOP 8330 CLC 8640 RTS ; ALL DONE 
8030 LDA VSTT2 ;SET V2 COL, PTR. TO NEXT8340 ADC LLV2 8650 NEAA LDA VPTR3 
8040 STA VPTRZ 8350 STA VPTR2 8660 STA VSTT3 
8050 ADC TL ;COL OF 2 8360 LDA VPTR2+1 8670 LOA VPTR3+ 
8060 STA V2COLP 8370 ADC LLV2+1 680 STA VSTI3H 
8070 LDA VSTT2+1 8380 STA VPTR2+1 8690 INC NROW 
8080 STA VPTR2+ 8390 JMP AAMRC ;GET NEXT 2 ELEMENTS 8700 LDA #1 ;FIRST COL. 
8090 ADC #0 8400 ENDCOL JSR FATOVI ;FACBL (SUK) TO V1 a710 STA COL 
8100 STA V2cOLP+! 8410 LOA #1 ;FIRST ROW 8720 JKP AALOOP 60 NEXT ROW FIRST COL, 
8110 AALOP LDA #0 ;ZERO ROW COL TOTAL ©8420 STA ROW 8730 NROW .BYT 0 
8120 STA FACH 8430 LOA COL 8740 ROW .BYT 0 
8130 STA FACKEL 8440 CHP VSIZE2+1 8750 COL .BYT 0 
8140 STA FACKH2 8450 BEQ ENDROW 8760 LLV2 .WOR 0 
8150 STA FACKES 8460 LDA VSTT3 ;SET V2 PTR.TOSTARTCURRENT 8770 V2COLP .WOR 0 
8160 STA FACHHS 8470. STA VPTRS ;ROW 8780 «END 
8170 AAMRC JSR V2TOT2 ;GET V2 8480 LDA VSTTS+1 | 
‘SOR 1240 LDA #800 ;ARRAY NOT FOUND 1500 5 


1510 SORTOS LOY #604 

1520 LDA ($22), ;6ET ARRAY DIMENSION 
1530 CHP #01 

1540 BEG SORTOS ;ONLY 1 DIMENSION 
1550 LDA #601 ; INCORRECT DIMENSION 
1560 IMP SORT21 

1570 5 

1580 SORTOS LDY #805 

1590 LDA ($22),Y ;GET NUMBER OF ELEMENTS) 
1600 STA NOOFE+1 

1610 INV 

LOA ($22), 

STA NOOFE 

LDA NOOFE+! ;ENOUGH ELEMENTS? 
BNE SORTO7 ; YES 

LDA NOOFE 

CHP #602 

BCS SORTO7 ;YES 

LDA #802 5700 FEW ELEMENTS 

MP SORT21 


1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 

1710 5 
1720 SORTO7 LDA NOOFE ;SET COUNTDOWN 
1730 STA NOOFC ; FOR NUMBER OF 

1740 LDA NOOFE+1 ; MAIN SORT LOOPS 
1750 STA NOOFC+ 


-—_— SSS ee 


Routine entry point: $90AC 
Routine operation: the MAT 
routine uses the following 
Basic ROM calls, 


SAEF1 — Evaluate expression in 
brackets 

$BBD4 — FAC #1 to memory 
GY) 

$BBA2 — Memory (X,Y) to 
FACH1 

$B1BF — Float to fixed 

$8391 — Fixed to float 

$B867 — Memory (AY) + 
FAC#1 to FAC#1 

$B850 — Memory (AY) — 
FAC#1 to FAC #1 

$BA2B — Memory (AY) * 
FAC#1 to FAC #1 


e.g, both integer, The multiply 
routine works in the same way 
as the basic version above. It 
calculates the address of the 
next element required just by 
adding a pre-calculated offset 
for speed. 

Readers are advised to 
consult a standard mathematics 
textbook for details of matrix 
arithmetic. 


SORT 


Abbreviated entry: S(shift)0 
Affected Basic abbreviations: 


None 
Token: Hex $EE, $18, Decimal 
238,24 


Modes: Direct and program 


Syntax: SORT string array name 
=the string array name must be 
1 or 2:bytes long, this being the 
characters of the name 
(without the $ character). 
Errors: Syntax error - if no 
name is specified. 

Array not found ~ if the string 
array specified does not exist. 
Incorrect dimension - if the 
string array specified has more 
than one dimension, 
Insufficient elements — if the 
string array has only 1 element. 
Use: SORT is a bubble sort 
routine that will sort a string 
array so that all of the strings in 
the array can be readin 
alphabetically ascending 
order. For example: : 


Programming 


2 NAME. NAME 
3BUBBLE READ 

4 AFTER READING 
5READING SORT 

6 READ TEST 


Routine entry point: $9D25 

Routine operation: The array 
name is first read in and stored 
away in the Basic’s format for 
string arrays. The array storage 
area is then scanned for that 
array and if not found, the 
message array not found is 
displayed. If the array is found, 
the number of dimensions is 
checked and if there is more 
than one dimension, the 
message ‘incorrect dimension’ 
will be displayed, If that is OK, 
the dimension is checked and if 


The routine for assignment Recommended mode: Either itis only one value the message 
will, for speed, just perform a Purpose: To sort a string array AS() After SORTA ‘insufficient elements’ is 
block memory move if the two into alphabetically ascending 0 TEST AFTER displayed. If all checks are OK. 
arraysare both ofthesametype order. 1 SORT BUBBLE the array is then sorted. 

1760 2130, INY 2500 STA ($24),Y 

1770 SORTOB LDA #800 ;MAIN LOOP OF SORT 2140 LDA ($24),Y 2510 INY 

1780 STA FLAGS ;RESET SWAP FLAG, 2150 STA $FD 2520 LDA SFD+ 

1790 STA COUNT ; AND ILOOP COUNT 2160 INY 2530 STA ($24),Y 

1800 STA COUNT#! . 2170 LOA (924),Y 2540 IWY 

4810 DEC NOOFC ;DECREASE OLOOP COUNT © 2180 STA SFD#1 2550 LDA LEN 

1820 LDA NOOFC 2190 LOX LEN2 ;LEN(STRZ) =07 2560 STA ($24),Y 

1830 CHP SEF 2200 BEG SORTI7 ; YES, DON’T SWAP 2570 INY 

1840 BRE SORT? 2210 LOX LEN sLEN(STRI)=0? 2580 LDA SFB 

1850 DEC NOOFC# 2220 ‘BE SORTI4 ;YES, SWAP THEN 2590 STA ($24),Y 

1860 ; 2230 LDY #800 2600. INY 

41870 SORTO? LDA NOOFC+! ;END OF SORT? 2240 SORTL2 LDA ($FB),Y ;COMPARE $FB 2610 LDA SFB+1 

1880 BNE SORT1O ;NO 2250 CMP ($FD),Y 5 WITH $FD 2620 STA (924),Y 

1890 LDA NODFC 2260 BEG SORTI3 ;SAME 2630 LDA #801 ;FLAG SHAP 

1900 BNE SORTIO ;NO 2270 BCC SORT17 DIFFERENT, DON'T SWAP 2640 STA FLAGS 

1910 RTS ;YES, DONE 2280 JMP SORTL4 ;DIFFERENT, SWAP 2650 5 

1920 2290 ; 2660 SORTI7 INC COUNT ; INCREMENT INNER 
1930 SORTIO CLC ;SET $24 TO $2247 2300 SORTI3 INY ;LENGTH=256? 2670 BNE SORT18 ; LOOP COUNT 

1940 LDA $22 2310 BEQ SORTI7 ;YES, DON’T SWAP 2680 INC COUNT#1 

1950 ADC #807 7320 CPY LENL sEND OF STRI? 2690 SORTI8 LOA COUNT 

1960 STA $24 2330 BCC SORTI4 ;NO, CHECK STR2 2700 CHP NOOFC ;DONE? 

1970 LDA $2241 2340 BEQ SORTIS ; YES 2710 BNE SORT20 ;NO 

1980 ADC #800 2350 BCS SORTIS :ALWAYS 2720, LDA COUNT#1 

1990 STA $2441 2360 5 2730 CHP NOOFC# 

2000 5 2370 SORTI4 CPY L.N2 ;END OF STR2? 2740 BNE SORT20 ;NO 


2010 SORTI1 LOY #600 ;INNER LOOP 2380 BCC SORTL2 ;NOT YET 2750 LDA FLAGS ;ANY SWAPS? 


2020 LDA ($24),Y ;GET LENGTH,ADDRESS 2390 ; 2760 BEQ SORTI9 ;NO, END 

2030 STA LENI ; OF 1ST STRING 2400 SORTS LDA LENL ;LENI=LEN2? 2770 IMP SORTOB ;D0 NEXT LOOP 

2080 INY 2410 CHP LENZ 2780 SORTI9 RTS ;ALL DONE 

2050 LDA ($24),Y 2420 BEQ SORTI7 ;YES, DON’T SWAP 2790 SORT20 CLC 

2060 STA SFB 2430 BEC SORTI7 ;NO, LENICLEN2 2800 ; 

2070 INY 2440 5 2810 LDA $24 ; INCREASE POINTER BY 3 
2080 LDA ($24),Y 2450 SORT14 LY #800 ;SWAP, STRI=STR2 2820 ADC #803 

2090 STA SFB+L 2460 LDA LEN2 ; AND VICE VERSA 2830 STA $24 jad 
2100. INY 2470. STA ($24), 2840 LDA $2441 

2110 LDA ($24),Y ;GET LENGTH, ADDRESS 2480 INV 2850 ADC #800 

2120 STA LEN2 5 OF 2ND STRING 2490 LDA $FD 2860 STA $24+1 > 


cee eeeee eee eee 
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Afiected Basic 
VAL - VAL 

Token: Hex $E£,$20, Decimal 
238,32 

Modes: Direct and program 
Recommended mode: Either 
Purpose: To return the address 
in memory where a variable is 
stored, 

Syntax: VARPTR (variable 
name) ~ the variable name 
must be in ASCII characters. 
Errors: Syntax error 

Use: VARPTR can be-used to 
find the address in memory of 
any variable, be it simple or an 


2870 HP SORTI1 ;D0 INNER LOOP 
7880 ; 

2890 SORT21 ASL A ;SEND ERROR MESSAGE 
2900. TaY 

2910 LDA POINT,Y ADDRESS OF MESSAGE 
2920 Tat 

2930 INY 

2940 LDA POINT,Y 

2950. TAY 

2960 THA 

2970 JSR SABLE ;SEND 1T 

2980 JP $8462 ;PRINT °IN...? 

2990 ; 


3020 


‘3030 STERR1 .BYT '2ARRAY NOT FOUND’, $00 
‘3040 STERR2 .BYT "INCORRECT DIMENSION’ , $00 
3050 STERRS .BYT ’?INSUFFICIENT ELEMENTS’, $00 
3060 CA .BYT 0 

3070 CB .BYT 0 

3080 NOOFE .WOR 0 

3090 NOOFC .WOR 0 

3100 LEN .BYT 0 

3110 LEN2 .BYT 0 

3120 COUNT .WOR 0 

3130 TEMP .WOR 0 

3140 FLAGS .BYT 0 


«WOR STERRS 


element of an array. If the 
variable is a string, the value 
returned pointsto the length of 
the string (the following two 
bytes are the pointer to the 
actual string) for example: 
VARPTR (A$) will return the 
entry address of AS. 

To find the address of the 
string: DEEK(VARPTR(A$)+1) 
VARPTR (8B(12)) will return the 
address of the twelfth element 


3000 POINT .WOR STERRI 3150 END | 
3010 .WOR STERR2 
1080 LDX VARPOL ;GET POINTER 
1000 VARPTR JSR $AEFA ;SCAN *(? 1090 LDA VARPOI+1 
1010 JSR $BOBB ;FIND VARIABLE 1100 STX $63 ;SEND IT, STORE LOW BYTE 
1020 STA VARPOL ;STORE POINTER OFF 1110 STA $62 ;STORE HIBYTE 


1030 STY VARPOI+i 

1040 JSR $AEF7 ;SCAN PAST 1)? 

1050 LDA #800 ;SET TYPE TO REAL NUMBER 
1060 STA $0D 

1070 STA $0E 


1120 
1130 
1140 


1150 VARPOL .WOR 0 
END | 


1160 


LDX #890 ;EXPONENT = $90 
SEC 
MP $BC49 FLOAT AND SEND 


of the array BB. 
Routine entry point: $9FCA 


Routine operation: On entry, converted to floating point 
VARPTR scans pastthe opening form. 


bracket and then finds the 


variable (or creates it if itdoes code entry program, to be 
Not exist). The closing bracket found elsewhere in this i 
js then scanned past and the to enter this program. 


address of the variable is 


For help 


Please use our machine 


issue, 


Because of the size of this article it was impossible to 
print the Basic Loader for the machine code. If you 
would like a copy of the loader then please send a 
large stamped self addressed envelope to 

Better Basic Loader, Your Commodore, 1 Golden 
Square, London W1R 3AB, 


with Reading and Writing 
& 01-405 4017 


Since 1975, 350,000 
adults have been helped 
toread and write better. — 


If you want help look for | 


this sign. 


For further information 


Adult Literacy & Basic Skills Unit 
PO Box 213 London WCIV 7ET 


OR... MADE BY ALIEN 


THE FINAL CARTRIDGE 


THE FIRST OUTSIDE OPERATING SYSTEM FOR THE CBM 64 


This new operating system built in a cartridge does not use any 
memory and is always there. Compatible with 98% of all programs. 


Features: 
+ DISK TURBO - 6 times faster disk 
access - loading and saving 
TAPE TURBO - 10 times faster, even 
with files - normal Commadore com: 
mands - compatible with standard 
turbo's 
ADVANCED CENTRONICS INTER- 
FACE » compatible with all the well 


known centronics printers and Commo: 


dore printer programs. Prints all the 
‘Commodore graphics and control 
codes (important for listings) 
Advanced screen-dump facilities 
Prints Low-Res, Hi-res and Multico- 
our. Full page!!! Even from games and 
paint-programs, like Doodle, Koala 
Pad etc. Searches automatically for 
the memory-address of the picture 


+ 24K EXTRA RAM FOR BASIC-PRO. 
GRAMS AVAILABLE: Two new com 
mands ..Memory read. ..Memory wrt 
te" They move 192 bytes with machi 
nelanguage-speed anywhere in th 
64K Ram of the CBM 64. Canbe used 
with strings and variables 
BASIC 4.0 COMMANDS like Dioad, 
Dsave, Dappend, Catalog. etc 


BASIC TOOLKIT with Auto, Renum 
(incl Goto and Gosub), Find, Help, Old 
ete 


+ PREPROGRAMMED FUNCTION 
KEYS: | Run, Load, Save. Catalog, 
Disk commands, List (removes all list 
protections) 

+ KEYBORD EXTRA’S - Allows you toy 
delete part of a line; stop and conti 
hues ustings; move cursor to lower 
lefthand corer. Pokes and Syscalls in 
Hex, Typ-command operates your prin 
ter as a typewriter 

+ COMFORTABLE EXTENDED ML. 
MONITOR: - with relocated load 
scrolling up and down. Bankswitching 
ete 

+ RESET SWITCH: - resets to monitor 
resets with old, resets to Hi-Res prin 
ting; resets every protected program 
ON/OFF SWITCH - we hope you 
never need that ane 

14 Days money 
12 Months repla hack guarantee 
cement quarantee if you ai 

dissatisfied 


FOR ONE 50. 
a . 
£€ s 


FOR THREE 
OR MORE ¢ . 
each 
Dont war us 
ORDER G 0. 
E 


SPECIAL 
INTRODUCTORY 
PRICE 


FOR TWO 37 
£ . 


each 


P; 


U.K. ORDERS Barclays and Accescards oF 
Cheques should be made out to 
H & P Computers,{¥C) 9 Hornbeamwalk 
Witham Essex CMB 2 SZ England. 
Telephone: 0376 - 511471 


HBP compute 


The 


WINNERS & 


of the ASP DREAM HOLIDAY Competition 
ArgusSpecialist Publications Ltd. are pleased to announce 
the 10 


L____ThirdPrize 


the ever popular BBC Model B 
value of £2,500 has been | \ Micro computer plus software 
edtoMrk.Gouldthorp | \ package, awarded to Master P. W. 


rodside Road, Radel avson of I Ladieside, Brae 
ont, Notinghan NGI2 SHS Shetland ZED 


And the winner of 
Tourth pr 


a superb Minolta X700 camera 
mes with 50mm fens and flashgun is 
Of 63 Cross Flats Pace, Beeston, MrLee Sullivan of 3 Admers 


Leeds LSU JN. Wood. Vigo Village, Meopham, 
= z Kent DAL 0ST. 


cab Sse 


ASP would like to thank everyone who entered the competition 
and CONGRATULATIONS to Mr Gouldthorp for his winning 
sentence which we've printed below 


...to combat boredom by the beach, 
keep magazines in easy reach!” 


“ 


COMMODORE 64 OWNERS 


The Ultimate Reference Book 


EVER HAD A LOADING PROBLEM? 


Then send off for WIZARD'S TAPE HEAD ALIGNMENT KIT - No one 
should be without one! 


By far the most common cause of loading failure is bad alignment of 
your tape heads. All cassette units can became aut of alignment with 
Use and may have been incorrect from the start. Our alignment kit will 
allow you to precisely set up your tape heads for possible 
loading conditions. in many cases this will make ble 
difference jn loading reliability especially of fast | 

Our kit comprises 

(1) A precision recorded cassette containing a sophisticated test 
program. (2) A special adjustment screwdriver. (8) A direction 
indicator, (4) A turning meter. (6) A detailed instruction booklet with 
slagrams. (0) A Loading Doctor = te help you diagnose any loading 
Problems, All of this for only £8.95! 


COPY KING 


‘#Revolutionary new copier for FAST LOADING programs. 
+Striped loaders, picture loaders, etc. handled with ease 

{BAEK up copies are made on blank TAPES at fas speed festerihan ie! 
yExtremely easy to use — no technical knowledge requir 

#No additional hardware and\no second cassette rechrder are 
{Me beleve nis 100/0 machine code copier isunrvaledin performance 
+#*Buy the market leader, Great value at 7 


HALF PRICE SPECIAL THIS MONTH!!! 


‘Copycat and Lightning Load together for only £5.85. Usually £5.95 each, 


COPYCAT 


Our highly popular back-up copier for Commadore/standard rate 
loading systems 

‘sTousands sold In the last yea 

**Makes back-up copies of Cammodore/standard rate software onto blank 
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Programming The Commodore 64 by 
West 


COMMODORE ns and senda 


ograms, 


2 
No coeate jiniccst 


tapes. 
+Wizard sound effects, Cassette magic sense, 


LIGHTNING LOAD II 


*Converts almost all your slow loading games/programsinto SUPERFAST 
TURBO loading versions on tape. 
+The tedious wait fr loading is over when you buy this excellent program. 


‘Overseas orders welcome. Europeans please add 50p, Outside Europe 
ads £1.00. UK postage ree, Rapid dicpaich of orders. Cheques/Or to 
‘SOFTWARE (DEPT. A) 
59 THE MARLES, EXMOUTH, DEVON x6 4NE 


005 ove 
jan Von 


@ Does your micro chat to 70,000 people across the UK? 


@ Can your micro interview pop stars, hackers and doyennes 
of the computer industry? 


@ Can your micro provide the answer to your technical and 
software problems? 


@ Could your micro send and receive telex’s worldwide? 


@ Does your micro do your shopping for you—and have it 
delivered to your door? 


@ Is your micro an answering machine, delivering your 
private mail whenever you log-on? 


NO?....................Shame! 


Brig your mit ia 


Yi , pne terme 
a 


8 Herbal Hill, London EC1R 5EJ 
‘Telephone: 01-278 3143 


To: Micronet 800, 8 Herbal Hill, London EC1 
Please send me a brochure on Micronet 800 


Name 


Address __ 


aa Telephone No. 


Age Micro 


(MetG?) d 


5 
| 
| 
I 
I 
I 
| 
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YC IAN 96 


Jayne Goin had a heart to 


heart with Commodore's new] 


PC-20 and didn’t suffer 


agonies. 


FOR MOST PEOPLE IT IS HARD TO 
believe that itis only five short years since 
the home computer revolution began 
with the launch of Sir Clive Sinclair’s ZX 
range of computers. Since then 
Commodore has become a household 
name but the full title of the company, 
Commodore Business Machines, beliesits 
roots as a major force which changed 
attitudes towards computers in business 
and paved the way for Sinclair. 

Prior to the launch of CBM’s PET range 
of computers, business machines were 
unwieldy beasts and very much the 
preserve of the larger domestic and 
multinational companies. The concept of 
a computer on every desk was one which 
Commodore made very much its own 

The advantage of the PET was that it 
was a stand alone computer. Each 
machine held sufficient memory to 
enable an executive to perform many 
tasks in the comfort of the office, when 
previously he had to book time on the 
mainframe machine. 

Since these halcyon days Commodore 
has seen many changes, including the loss 
of its lead to IBM’s range of personal 
computers. IBM’s domination has 
reached such proportions now that this 
company has become something of a 
demi-god in business circles and the PC 
has become a machine which has set the 
standard for small professional 
computers. 

Obviously, Commodore has found the 
loss of the lion’s share in this area a bitter 
pill to swallow but the launch of the PC-10 
and the PC-20 heralds a new fighting 
attitude. 

This article is partially a review of the 
PC-20 but because PC isa generic termitis 
also a review of these systems as a whole. 
The implication behind this is that the PC- 
20 complies to the standard very closely 
and is a worthy contender in the PC 
stakes, 

The heart of the new machine is the 
8088 microprocessor which can be con- 
sidered to be the ‘executive’ chip. This is. 
the decision maker and prime mover like 
a human executive within the business 
world. 

In the same way that an executive 
increases his efficiency by having a 


complemented by an 8237A controller. 
This chip can access memory directly and 
can download the contents to a disk or 
any other peripheral leaving the main 
Processor to carry on its main function 


personal assistant to perform the routine 
tasks of the day, the 8088 is 
1 70 


without interruption. The result as far as 
the user is concerned is that a program 
can run continuously without having to 
waste time waiting for the machine to 
finish saving things to disk or typing data 
out on a printer. 

To take this analogy with business 
organisations one stage further, the 
executive needs to carry out calculations 
during the working day. Some of these are 
relatively simple and can be done by 
mental arithmetic, but for others a 
calculator must be employed. Not that the 
executive is incapable of performing 
these calculations himself, it’s just that he 
can save time this way. 

In the PC, a similar situation occurs, 
The 8088 can only calculate with whole 
numbers, integers. Much of its work relies 
on the use of numbers with decimal 
places even if these are just pounds and 
pence. In the early days PC software had 
routines built in to overcome this 
problem and much of the software 
produced today isstill structured this way. 
Greater efficiency can be achieved by 
giving the 8088 its own ‘calculator’ in the 
form of an 8087 chip which can perform 
floating point calculations. 

This facility is catered for in the PC-20 
and alongside the 8088 is an IC socket 


which can house an 8087 as an optional 
extra. 

This multitasking organisation is the 
basis of the PC, an executive witha PA and 
a calculator, a mirror image of the real 
world of efficient business. 

The PC-20 incorporates this basic 
structure in a welll designed modular unit 
There are many variations which can be 
chosen around this basic theme. Colour, 
graphics and sound boards can be 
plugged into sockets inside the main unit 
for specialist’ applications, RS232 or 
Centronic printers can be attached and 
the basic twin disk configuration can be 
extended to support four drives in all or 
even two Winchester drives, 

The standard machine has two disk 
drives: a standard 5.25 inch 360K drive 
and a 10M/byte hard disk. The inclusion 
of the hard disk increases software 
security and access because the most 
commonly used programs can all be 
transferred to this disk for ready use and 
the saving in time and on wear and tear 
which normal backup copies undergo 
during a working day is one of the most 
valuable facilities which the PC-20 has to 
offer. 

The PC is the closest thing to a ‘soft’ 
machine which can be imagined 


Obviously a resident 8K 
ROM must be incorporated 

to control initialisation of 

the system and the loading of the system 
disk but the choice of language isentirely 
up to the user. MS-DOSis the PC standard 
but the sytem disk also has an option to 
use GWBASIC which is one of the most 
user friendly Basics to date. 

A full description of GW would stretch 
this article throughout a whole issue of 
Your Commodore so a mere taster is all | 
‘can give. Apart from the usual commands 
which form the building blocks of any 
Microsoft implementation of Basic, there 
are also the extended graphics commands 
which are to be found in the new 128, with 
the exclusion of sprites. Screen windows 
can be created, the memory can be 
structured to include machine code 
routines which may be called from Basic 
programs and related files on disk can be 
linked by ‘pathways’ to make selection 
easier (obviously an essential with such a 
lot of disk memory around). 

One of the strongest facilities of 
the language is the SHELL command 
which allows the program to slip out of 
the current Basic program and into 
another program or MS-DOS routine and 
then back again to where it left off. 


One extra . 
facility is an integral error~ 

locator which is superb if the very strict 
rules of syntax are observed. (spaces 
between commands are essential) but can 
give strange results if you don't. Should 
you, for example, omit a space between 
the FOR in a loop and the variable, it is 
quite probable that the indicator will flash 
under the word TO, giving rise to 
confusion. However, | will accept Micro- 
soft’s attitude that a PC programmer isnot 
generally a beginner but a true 
professional and that such a rudimentary 
error would be spotted. After all there are 
many other errors which are not so easily 
noticed which this system can locate in 
the twinkling of an eye. 

For most users Basic is nota vital facili 
because they are only interested in appli- 
cation software, but the time often comes 
when a specific need arises which is not 
covered by an existing software package 
and such a valuable facility as this could 


save money when these dire 
situations arise. 

The technical specifications of the 
machine are initially modest by PC 
standards but this helps to keep the cost 
down and the unit can be expanded from 
a basic 256K green screen 80 24 text only 
model up to a 640K RGB colour graphics 
and sound systeem with a screen resolu- 
tion of 720 * 350 pixels. 

The keyboard is detachable, 
connected to the main unit by a coiled 
cable, and has 10 programmable function 
keys and a full numeric keypad. The 
power supply has an inbuilt fan which 
keeps everything relatively cool during 
operation, indicative of the attention of 
detail which Commodore has maintained 
despite the very modest price of £2795, 

What Commodare has produced with 
this 16-bit PC-20, is a low-cost, eff 
workstation which can draw on any of the 
programs in the extensive PC library. No 


doubt the gradual domination of IBM in 


the business sector has caused 
Commodore's executives to grind their 


teeth in despair but, now that they appear 
to have swallowed their pride and put] 71 \ 


away their PET projects, the PC-20 will 
give them a firm basis to build upon and 
maybe one day topple the usurper from 
the throne which was once their own. 


Lc 


HOW OFTEN DO YOU NEED 
to poke atwo byte number into 
two memory locations? You 


know the type | mean, 
POKEing the start of Basic into 
memory locations 43 and 44. As 
you have no doubt found you 
have to split the number into 
two parts, its high value and low 
value. This is because each 
memory location can only hold 
a number up to 255 

Splitting a number into its 
high and low bytes is usually 
done with a couple of program 
lines such as 


LOW = INT (NUMBER/256) 
HIGH = NUMBER - INT(NUM- 
BER/256)*256 


This month Steve Mehew 
provides us with a handy little 
machine code routine that will 
automatically split a_ number 
into its two parts and POKE 
them into the relevant 
positions. You use the routine 
by issuing the following 
commands; 


SYS 49295,A,B 


where A is the address and B is 
the number. The number B is 
dealt with in the proper 
low/high order i.e. the low 
byte is stored in address A and 
the high byte is stored in 
address A+. 

Included in the same Basic 
loader isa routine that provides 
the C64 with an INSTRING 
function. The purpose of the 
routine is to find the first 
occurrence of a string within 
another string. The starting 
position of the string is then 
returned in another variable. 
To use the command you issue 
the following command; 


SYS 49152,A$,B$,C 


where A$ is the main string, BS 
is the string to be searched for 
and C is the variable that will be 
left holding the starting 
position of the string. If BS is 
ot present in AS, Cwill be left 
holding zero. 

As an example, if A$= “THIS. 
1S A TEST” and B$="IS" then C 
would be left holding three, as 
three is the starting position of 
“1S” in the word “THIS”. 

Graham Orr, from Oswald- 
twistle in Lancs, has sent in a 
handy routine that will allow 
you to change one type of 
character on the screen for 
another. For example you 
could change all of the 
character ‘A’s to ‘B's, At first 
glance this may not seem to be 
all that useful but when you 
remember that you can re- 
define any of the C64’s char- 
acters the routine will come 
into its own, You could for 
example define the character 
‘A’asa same wheel, character B 
could the be defined as the 
same wheel but rotated 
slightly. If you were then to 
swap character ‘A’s for ‘B's and 
then back to ‘A’s you could 
give the impression of 
movement. 

Now it’s time for a small 
confession, the gremlins 
messed up Asmat. Ullah’s 
PRINT AT program in our 
November issue. The correct 
version should be; 


1 FOR x=828 TO 839:READ 
Y:POKE X,Y:NEXT 

2 DATA 32,235,183,164,20,24 
32,240,255,76,157,170 


To use this routine you simply 
enter; 


‘SYS(828)x,y;““MESSAGE” 


and your message will appear 
at the xy position on the 
screen. 

Well, that’sit for this month, 
If you have any handy little 
routines that may be of use to 
other Commodore owners, 
why not send them to Scratch- 
pad, Your Commodore, No 1 
Golden Square, London WIR 
3AB? 


100 REMCSPC2]"INSTRING’ AND 
"TWO BYTE POKE? 
110 REKESPC2: 


120 REM 
130 REM COPYRIGHT STEVE MEHE 
W, HAY, 1985 


0 10 22: 

180 FOR D=0 TO 7: 

KE S+AD,B 

190 AD=AD#t 

200 NEXT: READ B: 

210 IF LCCOB THEN 300 

220 NEXT: IF C8¢951434 THEN 4 
0 

230 PRINT:PRINT "ALL DATA 
CORRECT, "END 

300 PRINT:PRINT "DATA ERROR 
IN LINE*;500¢L85, 

310 STOP 

400 PRINT:PRINT “SERIOUS DAT 
A ERROR," 

410 PRINT *ERROR IN DATA AND 
LINE® 

420 PRINT "CHECKSUM(S), OR 
HAIN CHECKSUM® 

430 STOP 

500 DATA 32,253, 174,32, 158, 
173,32, 166, 1020 

505 DATA 182,133, 2,168,177, 
34, 153, 181, 1030 

510 DATA 192, 136, 16,248, 32, 
253, 174,32, 1083 

515 DATA 158, 173,32, 166,182, 
133,158, 165, 1167 


520 DATA 2,54, 229, 158, 170, 
232,134, 2,983 

525 DATA 160,0,162,0,189, 181, 
192,209, 1093 

530 DATA 34,240,7,282,228,2, 
208, 244, 1195 

535 DATA 240, 44,132, 159,134, 
251,166, 158, 1284 

540 DATA 224, 1,240, 18,202, 
134,252, 166, 1237 

545 DATA 251,232,200, 177,34, 
221, 181,192, 1488 

550 DATA 208, 12, 198,252,208, 
243, 1665251, 1538 

555 DATA 232, 138,208, 12,240, 
10,166,251, 1257 

540 DATA 144, 159, 208, 207,240, 
205,169, 0, 1352 

565 DATA 72,32,253, 174,32, 
139, 176,133, 1011 

570 DATA 75,132, 74,165, 13, 
208, 19,165,849 

575 DATA 14,208, 15,104, 133, 
99, 169,0,742 

580 DATA 133,98, 162, 144,32, 
68, 188,76, 901 

585 DATA 208, 187,162.22, 108, 
0,3,32,722 

590 DATA 253, 174,32, 138, 173, 
32, 247, 183, 1232 

595 DATA 185, 20,133,251, 165, 
21,133,252, 1140 

400 DATA 32,253, 174,32, 138, 
173,532,247, 1081 

405 DATA 183, 160,0, 165,20, 
145,251,200, 1124 

410 DATA 145, 21,145,251,96, 
255, 0,255, 1188 


100 PRINT CHRS(147) 
:PRINT "TO USE ENTER THE 
FOLLOWING POKES" 

110 PRINT:PRINT* POKE 49250, 
SCREEN CODE OF CHARACTER 
TOCSPC133BE CHANGED" 

120 PRINT:PRINT" POKE 49251, 
NEW CHARACTER® 

130 PRINT:PRINT® SYS 49152 
+70 MAKE THE CHANGE" 

140 FOR T=49152 TO 49200 

150 READ A 

160 POKE 1,8 

170 NEXT 


180 DATA 140,0,169,0, 133,34, 
169 

190 DATA 4,133,35, 177, 34,205, 
8 

200 DATA 192,240, 23,24, 165, 
44,105 

210 DATA 1,133,34, 144,240, 
165,35 

220 DATA 201,8,240, 16, 24, 105, 
1 

230 DATA 133,35,76,10,192, 
173,99 

240 DATA 192, 145,34, 76,10, 
192,96 
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Mercenary —a unique combination of flight 
simulation, adventure and arcade fun. You choose 
the action. 

There is complete freedom of movement in 
a truly three-dimensional vector-graphic environ- 
ment. Graphics of exceptional speed create a 
very realistic experience. 

You'll never play the same game twice. 
Random elements attempt to seal your fate. 
Your interaction is crucial. 

Mercenary presents an absorbing challenge 
that you will accept again and again. 
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IF YOU THOUGHT YOU WERE 
in for an easy time this month, 
you're wrong. | want to 
describe a machine code 
package which will provide 
you with 12 commands for the 
ulation of bit mapped 
images. Whilst the commands 
are designed to work in high 
resolution mode, they will 
function in multicolour mode. 

The colour manipulation 

routines will not, however, 

work as expected. 

Before you howl with 
anguish, this is not just another 
drawing package. Apart froma 
single command for the 
drawing of single points, there 
are no line drawing or similar 
commands. Before | spout 
forth on the package, here is a 
small tutorial which will explain 
my reason for developing the 
package. 

In essence, there are three 
basic means of creating 
pictures on the C64, 

1, You can use simple line, 
circle and fill commands to 
draw pictures. This is the 
approach adopted by most 
adventure writers and, in my 
opinion, doesn't give parti- 
cularly detailed results. 

2 You can build up pictures 
from redefined characters 
Since, without use of raster 
interrupts, you are limited 
to 256 characters, there are 
limitations, 

3. You can save pictures drawn 
by a Koala Pad or similar 
product and store them on 
disk. 

In this article 1 want to 
describe a slightly different 
method of creating pictures. 
The idea is to set up shape 
tables in memory and putthem 
on the high resolution screen 
in a manner similar to the 
potato prints used by children. 
Using ‘this approach it is 
possible to create pictures 
similar to those used in games 
like Lords of Midnight. 


So what is a shape table? 
Well it’s a collection of designs 
saved in memory which can be 
copied to the high resolution 
screen. The system | have used 
is to mimic the C64’s character 
set. This, of course, is a shape 
table where each entry is a 
character design, Each shape is 
a rectangle of complete eight 
by eight pixels. The design of 
each row is stored in sequence 
giving eight bytes. Imagine a 
square shape: 


AB) 16 2 
BERG: Hh 
ie ah) SRE 
MN OP 


This is stored as: 


ANCDEFGHIJKLMNOP 


Any shape can be defined 
by its start address, width 
whole characters) and 
height (in whole 
you wanted « define the 
above example | i the character 
ROM, its start address would 
be 53248, its width would be 
four and its height four. Don’t 
tty to use the character ROM 
directly, | have provided the 
means of copying the ROM to 
RAM6so that you can play about 
with it, 

In order to reduce the size 
of the code - it’s long enough 
already - I've limited the 
printing of shapes to the high 
resolution screen to whole 


its 
haracters). If 


character positions. This isn’t 


too much of a 

because: 

1 The colour matrix is limited 
to whole character positions 
in high resolution mode. 

2 With careful design of 
shapes and the mixing rules 
provided, you can over- 
come this limitation. 

3. Ifyou must have single pixel 
positioning, you can mix 
sprites with the picture. 

By the way, the reason I’ve 
stuck to high resolution mode 
is that | prefer the detail that it 
allows and with a bit of cunning 
you can get decent colour 
mixing, 

So on with the commands. 
ye summarised them in Table 
1 with the syntax. 


restriction 


In Table 1: 

SA has the value 49152 

X is the horizontal position of a 
dot 

Yis the vertical position of adot 
Lis the ink colour and P the 
paper colour 

XS is the horizontal position of 
the top left corner of ashape or 
zone (0-319) 

YS is the vertical position of the 
top left corner of a shape or 
zone (0-199) 

XF is the horizontal position of 
the bottom right corner of a 
zone (0-319) 

YF is the vertical position of the 
bottom right corner of a zone 
(0-399) 

Wis the width of ashape (1-32) 
HI isthe height of ashape (0-25) 
BX is the horizontal position of 
the top left corner of the 
airbrush area (0-319) 

BY is the vertical position of the 
top left corner of the airbrush 
area (0-399) 

BS determines the air brush 
size (O-small, 1=large) 

DD specifies the number of 
dots per air brush “squirt” (0- 
255) 

AD is the address of the 
character set to be down 
loaded: AD = 53248 for upper 
case, AD = 55296 for lower case 
F1 determines how a dot ir 
drawn: 

O clears a dot 

1 sets a dot 

2 flips a dot 

3. changes the paper in the 
character holding the dot but 


does not plot a dot. This is 
useful for painting a 
background once the fore- 
ground is finished, 

F2_ enables and disables the 
updating of paper colours 
when dots are drawn: 0 
disables, 1 enables 

F3. specifies how text and 
shapes are printed: 0 is 
overprint, 1 is Inclusive-OR, 2 
is Exclusive-OR 

F4 toggles text and shapes into 
reverse field: 0 is normal, 1 is 
reversed field 

Due to limitations of space, 
1 cannot give a detailed 
description of the commands. | 
hope the following summaries 
will suffice, 

Command 1 clears the high 
resolution screen to the 
required ink and paper values 
and turns it on, Command 2 
changes the ink and paper 
values over all the screen. 
Commands 3 and 4 toggle 
between text and high-res 
screens without disturbing 
their contents. 

Command 5 changes a 
specified point in a manner 
determined by flag F1. The 
colours will be updated if 
commands 6 and 10 have been 
used. 

Command 7 draws a 
random area of dots with the 
airbrush. This is useful for 
shading effects, Command 8 
fills, inverts or clears a rect- 
angular area of screen. 
Command 10 toggles a flag 


which determines whether the 
ink and paper are updated by 
any drawing command, If this 
mode is disabled, you can 
update the picture without 
altering the colours. 

Command 11 copies the top 
line of the text screen to the 
specified line on the high 
resolution screen. The 
character shapes are taken 
from the character area. This is 
the easiest way of printing text. 

Command 12 puts a shape 
on a specified area of screen, 
You must specify the start 
address of the shape. 

So you know where to save 
your shape tables, here is the 
memory map of the system: 


$1000-$13E8 (1024-2023) — text 
screen 

$A000-$BF40 (40960-48960) — 
high resolution bit map 
$8C00-$8FEB (35840-36840) — 
colour matrix 

$CA00-SCE0O (51712-52736) — 
character table 

$C000-$C5D1 (49152-50641) — 
machine code 


This means that the safest 
areas for shape tables are 
$C5D2 to $C9FF (50642-51711) 
and S8FE9-S9FFF (36841-40959) 
This totals about SK and should 
be sufficient for most purposes 
(the demo uses only 424 bytes). 

If you want to use sprites, | 
recommend that you use the 
area $8000 to $8C00. This is 
sufficient for 48 sprites. The 


sprite pointers occupy 36856 to 
36863 

You should take care to 
protect the top of RAM and 
should use either of the 
following lines at the 
beginning of your program: 
10 POKE 56,140: CLR 
or if you use sprites 
10 POKE 56,128: CLR 


Study the accompanying 
demonstration program, this 
uses many of the commands 
and multicolour sprites. It 
should give some hints on how 
to use the program, 

For those amongst you who. 
want to add drawing 
commands to the package, 
here are details of the dot 
drawing routine: 


X co-ordinate MSB into $0387 
X co-ordinate LSB into $0386 
Y co-ordinate into $0388 

F1 value into $0389 

Entry point $COCS 


You may find the creation 
of large shapes little awkward, 
| use Supersoft’s Graphics 
Designer for such work. Not 
only is it the best character/ 
sprite designer I've used but it 
also allows the creation of 
shapes built up from up to 32 
characters 

I hope you find this package 
worth the toil of typing it in. | 
believe you won't be 
disappointed. 


High Resolution Aid 


1 DATA76, 36, 192, 76,178, 192, 76,88, 192,76, 146,192, 76,48, 193, 76,132,193, 76,59 
2 DATAIS4, 76,242,194, 76,170,195, 76,7,196,76, 16,196, 76,166,196, 32,49, 194,165 
3 DATA2O, 141, 132,3,32,49,194, 165,20, 141,133, 3,169, 160,133, 169, 169,0, 133,168 
4 DATAI62, 64, 32,120,192, 169, 140, 133,168,169, 0,133, 168,173, 132,3,10,10,10,10 
5 DATA13, 133,3,162,8,32,120,192,173,2, 221,9,3,141,2,221,173,0,221,41,252,9 
6 DATAI,141,0,221,173,17,208,9, 32,141, 17,208, 169,57, 141,24, 208,96, 160, 127 

7 DATAI4YS, 168, 136,16,251, 72,24, 165,168,105, 128,133,168, 169,0,101, 169,133,169 
8 DATA104, 202, 208,231,96,173,2,221,9,3,141,2,221,173,0,221,41,252,9,3, 141 

3 DATAO, 221,173, 17,208, 41,223,141, 17,208,169, 21,141, 24,208,96, 32,49, 194,165 
10 DATAZO, 141,132,3, 32,49, 194, 165,20, 141,133,3, 76,65, 192, 32,169,193, 32,114 
11 DATA193, 32,149,193, 120,165,1,41,254, 133, 1,88,173,134,3,41,7,141,141,3,56 
12 DATAIGS,7,237,141,3,141,141,3,24,169,1, 174,141, 3, 240,4, 10,202, 208,252, 160 
13 DATAO,174,137,3,240,17,224,2,240,28,17,170, 145,170,120, 165,1,9,1,133,1 

14 DATABB,96,73,255, 48,170, 145,170, 120,165,1,9,1,133,1,88,96,141,160,3,49 

15 DATA170,141,159,3,240,6,173, 160, 3, 76,11, 193,173,160, 3, 76,254, 192, 32,49 

16 DATAIS4, 165,20, 141,134,3,165,21,141,135,3, 32,49, 194, 165,20, 141,136, 3,141 
17 DATA143, 3, 32,459,194, 165,20, 141,137, 3, 32,212, 194,173, 137,3,201,3,240,14 

18 DATA76, 197,192, 169,0,6,252,6,251,101, 252,133,252, 96,32, 169,193, 32,114,193 
18 DATA32, 149,193, 96,173,143, 3,74, 74, 74,170, 32,129, 195,24, 169,140,101, 254 [ 75 
20 DATA133, 254,96, 32,459,194, 165,20,141, 132,3,32,49,194,165,20,141,133,3,96 

21 DATA173,232,3,240,14,173,132,3,10,10,10,10,13,133,3,160,0,145,253,96,173 

22 DATA136,3,74, 74, 74,141,138, 3,173,135, 3, 74,173,134, 3, 106, 74, 74,141,139, 3 


€3 DATA], 139, 3,173,136, 3,41,7,141,140,3,173, 138, 3,133,251, 169,0, 133,252 

24 DATAIGE, 6, 32,93, 193,202, 208, 250,165,252, 133,171, 165,251, 133,170, 32,93, 193 
25 DATASE, 93, 193,24, 165,251,101, 170,133,170, 165,252,101, 171,133,171, 169,0 

26 DATAISS, 252, 173, 139,3, 133,251, 32,93, 193, 32,93, 193, 32,93, 193,24, 165,251 

27 DATAIO1, 170,133,170, 165,252, 101,171, 133,171,24,173,140,3,101, 170,133,170 
26 DATAIGS,O, 101,171,133, 171,24, 169,0, 101,170,133, 170, 169,160, 101,171,133 

29 DATAI71, 96, 32,253,174, 32,138,173, 32,247, 183,96, 32,49, 194,165,20, 141,144 
30 DATAS, 165,21, 141,145, 3, 32,49, 194, 165,20, 141,146, 3,32, 48,194, 165,20, 141 

31 DATA137,3, 32, 49,194, 165,20, 141,148, 3, 32,48, 194, 165,20, 141,149, 3, 32,187 

32 DATAIS4, 78, 147,3,78,147,3,78,147,3,173, 149, 3,208, 3,78, 147,35, 24,173,144 

33 DATA, 10S, 147,3,141,134,3,173,145,3,105,0,141,135,3, 32,187,154, 78, 147,3 
34 DATA7G, 147,3,78,147,3,173,149,3,208,3,78,147,3, 24,173,146, 3,109,147, 3,141 
35 DATAI36,3, 141, 143,3, 32,212,194, 32,197, 192,206,148, 3,208, 174,95,169,255 

36 DATAI41,14,212,141,15,212, 169,128,141, 18,212,169, 128,141, 24,212, 173,27 

37 DATA212, 141, 147,3,96,173,136,3,201,200,144,5, 169,200, 141,136,3, 173,135 

38 DATAS, 240, 12,173, 134,3, 201,64, 144,5, 169,63, 141,134, 3,96, 32,49, 194, 165,20 
39 DATAIGY, 21,141, 150,3,140,151,3, 32,49, 194,165,20,141, 152, 3, 32,45, 194, 165 
40 DATAZO, 164,21, 141,153,3, 140, 154,3, 32,45, 194, 165,20,141,155,3,32,49, 194 

41 DATA165, 20, 141,137,3,173, 152,3, 141,158, 3,238,155, 3,238,153,3,173,150,3 

42 DATAI72, 151,3,141,156,3,140,157,3,173,156,3,174,157,3,141, 134, 3,142, 135 
43 DATAS, 173, 158,3,141,136,3,141,143,3, 32,187,192, 24,173,156, 3,105.1, 141,156 
44 DATAS, 173, 157,3,105,0,141,157,3,173,156,3,205, 153, 3,208,207, 173,157,3,205 
45 DATAISY, 3,208, 199,238,158, 3,173, 158,3,205,155, 3,208, 176,96, 169,0,133,253 
46 DATA133, 254, 224,0,240,16, 24, 165,253, 105,40, 133,253, 165,254, 105,0, 133,254 
47 DATAZO2, 208, 240, 24,165,253, 109,139, 3,133,253, 165,254, 105,0, 133, 254,96, 32 
48 DATAYS, 194, 165,20, 164,21,133,251,132, 252, 169,0, 133,253, 169,202,133,254 
43 DATA16O, 0,173, 14, 220,41, 254, 141,14, 220,120,165, 1,41,250,133,1,177,251, 145 
SO DaATAeSS, 24,165,251, 105,1,133,251,165, 252,105,0,133,252,24,165,253,105,1 
$1 DATAI33, 253,165,254, 105, 0,133, 254,165,253, 208, 222,165,254, 201, 206,208,216 
S@ DaATAIZO,165,1,9,5,133,1,88,173,14,220,9,1,141,14, 220,96, 32,459,154, 165,20 
53 DATALY1, 232, 3,96, 32,49,194,165,20,141,169,3, 32,49, 194,165, 20,141, 150,3 

S4 DATAZ2, 49,194, 165,20,141,171,3,160,0, 140,170,3, 140, 166, 3,172, 166,3,185 
SS DATAO, +, 133,163, 169,0, 133, 164,6, 163,38, 164,6,163,38,164,6, 163,38, 164,24 
56 DATAIGS, 164,105,202, 133,164,173, 169,3,141,152,3,173,170,3,141,150,3, 169 
57 DATA, 141,153,3,141,155,3, 32,225,196, 238,166,3,173,166,3,201,40,240,6,238 
58 DATAI70,3,76,46,196,96,173,164,3,141, 134, 3,169,0,141,135,3,24, 14, 134,3 

59 DATAYS, 135,3,14,134,3,46,135,3,14,134,3,46,135,3,173,138,3,24,10,10,10 

60 DATAI41,136,3,141,143,3,32,169,193,96,32,49,194, 165,20, 164,21,133, 163,132 
61 DATAIGY, 32,49, 194, 165,20, 141, 150,3, 32,49, 194, 165,20, 141,152,3, 32,49, 194 
62 DATAIGS, 20,141, 153,3, 32,49, 19+, 165, 2@;141,155,3, 32,49, 154, 165,20, 141,160 
63 DATAS, 32,49, 194,165,20,141,171,3,32,125,197,14,153,3,14,153,3,14,153,3 
64 DATAIGS,O,141,149,3,173,150,3,172,152,3,141,164,3, 140,138, 3, 32,119, 196 . 


65 DATAIG0,0,120,165,1, 41,254,133, 1,88, 32, 70,197,120,165,1,9,1,133,1,88, 200 
66 DATACOY, 153, 3,208, 231,238, 149,3,173,149,3, 205,155, 3,240, 30,24, 165,170, 105 
57 DATAGY, 133,170, 165,171, 105,1, 133,171, 24, 165,163,109, 153, 3,133, 163,165, 164 
68 DATAIOS, 0, 133,164, 76,1,197,96,173,160,3,240,8,201,1,240,12,201,2,240,18 
63 DATAI77, 163, 32,108, 197,76, 108,197,177,163,81, 170,32, 109, 197, 76, 108,197 

70 DATAI77,163,17,170,32,109,197,96,72,173,171,3,240,6, 104, 73,255, 76,122,197 
71 DATALOY, 145, 170,96, 173,150, 3,141,156, 3,173,152,3,141,158,3,169,0,141, 168 
72 DATA, 141, 167,3,173,156,3,141,139,3,174,158,3, 32,129, 195,24, 169,140, 101 
73 DATAZSY, 133,254, 32,149, 193,238, 156,3,238,167,3,173,167,3,205, 153,3,208 

74 DATAZ2O, 238,158, 3,238, 168,3,173,168,3,205, 155, 3,240, 14,173,150, 3,141,156 
75 DATAS, 169,0,141,167,3, 76,145, 197,96 

76 REN 

77 REN**#8 eat eeeemneonnomnnen 

78 REN* HIGH-RESOLUTION AID * 

79 REM* AEW 1985 * 

BO RENS#OCteeeneeeeeneneesen 

81 REN 

62 FOR I=491S52 TO SO641 


63 READ X 
[ 7 | BY T=T+x 
8S POKE 1,X 
85 NEXT 
87 IF T<>16658% THEN PRINT”ERROR IN DATA” 
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The Project 


FINDING OUT WHETHER 
lines cross over each other - 
and, if so, where - is a problem 
that crops up in several entirely 
different circumstances. The 
basic situation can be repre- 
sented, regardless of applica- 
tion, as illustrated in Figure 1. 
This shows five ‘places’, repre- 
sented by numbered circles, 
joined together by lines. 

The lines in the figure cross 
over each other three times, In 
such a simple situation, a 
computer is hardly needed to 
count the number of 
crossovers and find their 
locations. But if there were 
many more places, and more 
lines between them, the task 
would be much more difficult 
and error-prone, and it would 
be a good idea to get a 
computer on the job. 

The crossover problem is 
important in the design and 
manufacture of printed circuit 
boards for items of electronic 
equipment, from television 
sets to computers. Electronic 
components are ‘printed’ on a 
printed circuit board, and they 
are connected by tracks, also 
‘printed’ on the board, that 
conduct electric currents 
between them. In Figure 1, the 
numbered circles correspond 
to the electronic components, 
and the lines to the tracks 
between them. Any tracks that 
cross over each other will lead 
to the creation of electrical 
paths that should not exist in 
the circuit. Such paths will alter 
the behaviour of the circuit 
from its required function. So, 
in this case, designs for printed 
circuit boards can be tested by 
seeing if they have any 
crossovers. 

Crossovers are also of 
importance in the provision of 
water, electricity and gas 
supplies to houses. This time, 
the numbered circles in Figure 
1 correspond to houses, and 
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the lines to the paths of the 
water, gas and. electricity 
pipelines. Laying the pipelines 
will be easier if there are no 
crossovers as this removes the 
possibility of damaging, say, 
the gas pipes, while dealing 
with the water mains. 

The project is to write a 
program which, when given a 
description of a network, can 
display the positions of any 
crossovers in it 


The Solution 


To write a program to find the 
locations of the crossovers in a 
network, we must first give a 
description of the network. 
This consists of the number of 
‘places’, their locations, and 
the details of which ones are 
connected to each other. If we 
use the network in Figure 1, the 
first two items can be given 
directly, and the third can be 
given by using a rather neat 
method. 

The number of ‘places’ is 
five, and their locations are 
given by their column and row 
Positions on the screen. The 
pattern of connections can be 
recorded by giving all the pairs 
of positions that are connected 
to each other. Referring to 
Figure 1, we can see that one is 
connected to five, and three is 
connected to four. All the 
connections can be recorded 
in a two-dimensional array, 
declared by: 


DIM C(5, 5) 


and using its elements so that, 
in general, C(|,)) isassigned the 
number of connections 
between | and J. The number of 
connections will either be one 
if there isa connection, or zero 
if there is not. The two connec- 
tions just mentioned can be 
recorded by: 


(1, 5) 


C(3, 4-1 


To record that there is no 
connection from four to five 
use: 


C(4, 5)=0 


This gives us the first part of 
‘our program as 


10 DIM X(5), ¥(5), C15, 5) 

20 FOR J=1 TO 5: READ X()), 
Y(I): NEXT J 

30 FOR J=1TO 5: FOR K=1TOS 
40 READ Ci, K) 

50 NEXT K: NEXT J 

60 DATA 50, 20, 20, 100, 120, 
180, 220, 110, 190, 30 

70 DATA 0, 0,1, 1, 1,0,0,1,0,1, 
I1L0,4,,0 

80 DATA 1, 0, 1,0,0,1,1,1,0,0 


Given this description of 
the network, the program can: 
plot it; find the crossovers by 
taking every pair of lines and 
testing whether they cross over 
each other; and, for those that 
do cross, find the positions of 
the crossings and mark them. A 
litle geometry is needed to 
find the equations of the lines 
and whether they cross, but 
otherwise the computation is 
straightforward, 

After setting the high- 
resolution graphics mode with 
the subroutine starting at line 
500, the network can be plotted 
by taking the positions of every 
pair of ‘places’ in the network 
and drawing a line between 
each connected pair, with: 


90 GOSUB 500 
110 FOR J=1 TO 4: FOR 
TOS 

120 IF CJ, K)=0 THEN 


30 


140 GOSUB 2000 
230 NEXT K: NEXT J 


The gaps in the listing will 
be filled by lines for the 
remaining tasks. The subrou- 
tine starting at line 2000, which 
is called from line 140, is our 
standard routine that draws a 
line from (X1, Y1) to (X2, ¥2). 

Now we can test every pair 
of lines to see if they cross. The 
method for finding if a pair of 
lines cross is based on the idea 
that any point on the line from 
(X1, ¥1) to (X2, Y2) has co- 
ordinates. 


N*X1 + (1-N)*X2, NYT + (1- 
N)*Y2) 


Putting N=1, gives (x1, Y1) 
and N=0 gives (X2, Y2). Values 
of N between zero and one 
gives points in between, and 
other values of N give points 
outside, as illustrated in Figure 
2. So, if we solve the equations 
of two lines written in this form 
for N, by testing the size of N 
we can see if the lines cross 
between their end-points. This 
gives us the following lines for 
finding the crossovers and 
counting them in CR. 


100 CR=0 

150 FOR L=1 TO 4: FOR M=L+1 
TO5 

160 IF J=L AND K=M THEN 230 


170 IF C(L, M)=0 THEN 230 
180 X3=X(L): X4=X(M): Y3=¥(L) 
Ya=Y(M) 

190 D={X1-X2)*(¥4-Y3) ~ (Y1- 
Y2)*(X4-X3) 

200 N=((Y4-¥3)*(X4-X2) — (X4- 


x3)*(Y4-¥2))/D. 
210 IF N 0 AND N 
CR=CRH 

220 NEXT M: NEXT L 


1 THEN 


Actually, each crossover is 
counted twice because, as the 
program is written, every pair 


PROGRAM: CROSSOVERS 

10 DIM X(5),¥(5),C(5, 5), XC(10) ,YOU10) 
20 FOR J=1 TOS: READ X(J), Y(d)s NEXT J 
30 FOR J=1 TO Ss FOR Ke! 105 

40 READ C(J, K) 

50 NEXT Kz NEXT J 

40 DATA 50, 20,20, 100,120, 180,220, 110, 190, 30 
10 DATA 0,041, 1,1,0)0)1)0)1)1)1,0))1 
80 DATA 1,0,1,050)1,1)1)0)1 

0 GOSUB 500 

100 RO 

110 FOR J=1 TO 4: FOR KeJ#1 10 5 

120 IF C(J, K)=0 THEN 230 

130 K1=K(0): KZ=K(K) WEY Cd) Y2=V(K) 
140 GOSUB 2000 

150 FOR Le1 TO 4: FOR MeL+! 10 5 

10 IF JL AND 
170 IF C(L, M)=0 THEN 220 
(L)s KAEK(MDs Y3eV(L)s YAY (M4) 

1-12) 4(Y4-V3)=(Y1-¥2) (14-13) 
YA=Y3)B(X4=K2) = (4-13) 8(¥4-Y2)) /D 

210 IF NDO AND NCL THEN CRECRH: XC(CR)=NAXL(1-N)BH2: YEU 
OR) =NBY I+ (1-ND8Y2 

220 NEXT Mi NEXT L 

230 NEXT Ks NEXT J 

240 FOR J=1 TO CR 

250 FOR ReVC(J)~3 TO YC(I)+3 

260 FOR CeXC(d)~3 TO XC(I)43 

270 GOSUB 1000 

280 NEXT Cz NEXT Re NEXT J 

290 END 

500 POKE 53272, PEEK(53272) OR 

510 POKE 53245, PEEK(S3265) OR 32 

520 FOR 1=8192 TO 16192: POKE 1, O: NEXT 1 

530 FOR I=1024 TO 2023: POKE 1, 22: NEXT I 

540 RETURN 

1000 RO=INT(R/8): CO=INT(C/@) 

1010 L=R AND 7 

1020 BIT=7 - (C AND 7) 

1030 BYTE=8192+RODS20+CONB+L 

1040 POKE BYTE, PEEK(BYTE) OR 2°81T 

1050 RETURN 

2000 DX=X2-K1s DY=¥2-¥1 

2010 IF DX=0 THEN 2070 

2020 FOR C=X1 TO X2 STEP SGN(DK) 

2030 REINT (V4 (C=H1) #DY/DX) 

2040 GOSUB 1000 

2050 NEXT C 

2060 RETURN 

2070 C=At 

2080 FOR R=¥1 TO Y2 STEP SGN(DY) 

2090 GOSUB 1000 

2100 NEXT R 

2110 RETURN 


Fig 3 


of lines that cross is counted 
twice. The point where, say, 
line A crosses line B, is counted 
once when all the lines are 
paired with line A andasecond 
time when all the lines are 
paired with line B. For this 
reason, the value held in CR 
after these lines are executed is 
twice the number of cross- 
overs. We shall leave the 
program like this because the 
steps have to be taken to 
ensure that each crossover is 
counted only once complicate 
it considerably. 

It is now a simple matter to 
record the position of each 
crossover because the value of 
N, which gives the position, has 
been found already. If we 
record the locations of the 


| crossovers by placing their x- 


and y-co-ordinates -respect- 
ively, in the elements of the 
arrays XC and YC, then we 
need only modify lines 10 and 
210 as follows. 


10 DIM X(5), Y(5), CIS, 5), 
XC(10), ¥C(10) 

210 IF N 0 AND N 1 THEN 
CR=CRH: XC(CR)=N*X1 + (1- 
N)*X2: YC(CRJ=N*YT + (1 
N)*Y2 


Finally, we can mark the 
position of each crossover with 


a square block composed of 
dots by using the subroutine, 
starting at line 1000, which plots 
a dot in column C and row R, 
repeatedly, 


240 FOR J=1 TO CR 

250 FOR R=YC(J)-3 TO YC(J)+3 
260 FOR C=XC(J)-3 TO XC()}+3 
270 GOSUB 1000 

280 NEXT C: NEXT R: NEXT J 


The complete program listing, 
with the subroutines, is listed as 
Figure 3. 


Further Developments 


You can gain some confidence 
in the program by drawing a 
different network connecting 
five ‘places’, recording it in C, 
and seeing that the program 
can mark ‘its crossovers. The 
program can be extended to 
deal with networks having 
more than five ‘places’ in them, 
but this is straightforward. It is 
somewhat more difficult to 
amend the program so that it 
does not count, and mark, 
every crossover twice. The 
crossovers can be marked 
more effectively, perhaps with 
a flashing block, like a cursor. 
Some way of displaying the 
number of crossovers would 
also enhance the program, 


Listings will be much easier to 
enter with our new system. 


COMMODORE LISTINGS ARE RATHER 
well known for the horrible little black 
blobs that always abound. Unfortunately 
the graphics characters which are used to 
represent graphic and control characters 
do not reproduce very well and they are 
also difficult to find on the Commodore 
keyboard 

In future all control and graphics 
commands will be replaced by a mnemonic 
within square brackets. This mnemonic is 
not typed out as printed in the magazine 
but rather the corresponding key or keys 
on the keyboard are pressed. For example 
[RIGHT] means press the cursor right key, 
you do not type in [RIGHT]. All of the 
keywords, what keys to press and how 
they are shown on the screen are shown 
below. 
Any character that is accessed by pressing 
shift and a letter will be printed as 


[Sletter] 
[SA] shift and A 
[+] shift and + 


Any character that is accessed by 
pressing the Commodore key and a letter 
will be printed as [Cletter] 


Lis 


If any characters are repeated the 
mnemonic will be followed by a number. 
This number is how many times you 
should enter the character. Any number 
of spaces over one will also be 
represented in this form 
[RIGHT10] press cursor right 10 times 


TINGS 


Any other characters should be easily 
recognisable for example CTRL-N means 
press CTRL and N and LEFT-ARROW 
means press the left arrow 

Any number of mnemonics can be 
enclosed in brackets for example 


[CA] Commodore and A [C+10] press Commodore and + 19 [SA10,SPC10,SA10] 

[C+] Commodore and + times means type 10 shift A’s 10 spaces and 
[C1] Commodore and 1 [SPC10] Press the space bar 10 times another 10 shift A’s, 

Mnemonic Symbol what to press} |Mnemonic Symbol what to press| [Mnemonic symbol what ro press 
[RIGHT] left/right] |(F5) HE £5] |[BLACK] CTRL &1 
(LeFT] shift left/right] [F6) shift & f5| | [WHITE] E CTRL & 2 
[UP] /down| \F7] 7} | [RED CTRL & 3| 
|[DOWN) gq up/down] |[F8) shift & §7| |[CYAN] = CTRL & 4 
[F4) f1/ [CLEAR] “HOME| | [PURPLE] CTRL & 5 
2) & f1) |HOME} gy CLR/HOME| |[GREEN] CTRL & 6 
IFS) £3) |[RVSON} us CTRL & 9} |[BLUE] : CTRL & 7| 
CF 4} shift & £3] |[RVSOFF] CTRL & of |IYELLOW, ant CTRL & 8} 
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oftelesoftware, with programmes to download into your 64 and 
save to disk or tape. Many telesoftware programmes are provided 
free of charge or at_ nominal cost. 

Dialog with over 600 massive databases on call and almost 
Unlimited information on just about any subject is Sccessible from 
your 64, together with BT Gold, Easylink, One to One etc,, with 
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400 T84=F$:T0=PEEK (53) +2568PEEK(54)-LEN(TS$) 
sPOKE 782, 70/256 

410 POKE 781, T0-PEEK(782) $256: POKE 780, LEN(TS$) 

420 SYS 65469 

430 POKE 780, 1:POKE 781, D:POKE 782,0:8VS 4s4b6 

440 POKE 254,5/256:POKE 253, 8-PEEK(254) $256: POKE 780,253 

450 POKE 782, (E+1) /256xPOKE 781, (E+1)-PEEK(782) $256 
SVS 65496:RETURN 

460 REM $898 LOAD DATA teat 

470 INPUT ECLEAR, DOWN2, RIGHT2IFILE NAME 

480 IF Ff OR LEN(Q$)>15 THEN RETURN 

490 INPUT*CDQWN3, RVSOKITERVSOFFAPE ORCSPC, RVSONIDERVSOFF 
ISK : DELEFT31";Ds 

500 IF D$<>*T"AND DS$<>*D*THEN RETURN 

510 DetsIF D$="D°THEN D=B 

520 LOAD F$,D, 1:RETURN 

$530 PRINT:PRINT® CDOWN2, RIGHTJERROR*: ADR=ADR-12 

540 POKE 54296, 15:POKE 54277, 10 

550 POKE 54278, 100:POKE 54273, 45:POKE 54272,00 
SPOKE 54276,17 

560 FOR X=1 TO 250:NEXT 

570 POKE $4276, 0:POKE 54277, 0:POKE 54278,0 

580 RETURN 

100 INPUT "ECLEAR,DOWN2]START ADDRESS *;ADR 

110 PRINT *CDORNZTPLEASE ENTER ALL DIGITS.* 

120 PRINT*CDOWNZISPACES WILL BE ENTERED AUTOMATICALLY 
{DOWN23" 

130 PRINT:PRINT ADR;":";:GOSUB 260 

140 IF St="CFLJ* THEN GOSUB 330:60T0 100 

150 IF S$="CF3]* THEN GOSUB 440:60T0 100 

140 REM READ DATA AND STORE 

170 CHECK=ADR-INT (ADR/256) #256 

180 FOR C=1 10 36 STEP 3 

190 NS=MIDS(S$,C, 3) :N=VAL (NS) 


200 CHECK=(CHECK+N) AND 255 

210 IF N>255 THEN N=0 

220 POKE ADR, NADR=ADR+1:NEXT C 

230 VFY=VAL (RIGHTS (S8, 3) ) 

240 IF VFYCOCHECK THEN GOSUB 530:60TO 130 
250 GOTO 130 


TO 13:FOR L=1 10 3 
i0T0 270 

THEN C=13:L=3 

THEN Ce13sL=3 


290 IF KS="F3]" 
300 Ss=S5eK$ 


310 PRINT K$;:NEXT LrPRINT®™ ";:NEXT CsRETURN 

320 REM $883 SAVE YOUR FILE teat 

‘330 PRINT*CCLEAR, DOWN2, RIGHT2ISAVE FILECDOWN2)" 

‘40 INPUT*FILE NAME 3"5F$ 

350 IF F$=** OR LEN(F$))15 OR F$="Q* THEN RETURN 

300 INPUT*CDOWNS, RVSONITCRVSOFFIAPE ORESPC, RVSONIDERVSOFF? 
ISK s DELEFT31";Ds 

‘370 Det: IF D$="D" THEN D=B 

‘380 INPUT*CDOWN2]START ADDRESS IN DECIMAL 

5390 INPUT*CDOWNJEND ADDRESS IN DECIMALCSPC4]:";E 


Machine Code Entry— C64 


EASY 
ENTRY 
EASY 


We make life easier 


for you with our 


machine code entry 


program. 


THE WORST THING ABOUT 
Machine Code programming is 
entering thousands of numbers 
and then finding that the 
program will not work. There is 
nothing else that you can do 
apart from go throughall of the 
listing trying to locate that 
mistyped character which 
prevents the program from 
working correctly. 

Now there’s an easier way 
to enter your machine code 
programs. With the Your Com- 
modore machine code entry 
program, each line of numbers 
is checked as soon as you press 
return. If you have made a 
mistake you will be asked to re- 
type the last line. Another 
added bonus is that you can 
save what you have entered at 
any time to tape or disk and 
carry on where you leftoff next 
time you come to your 
computer. 


Using the Loader 


Before you typein any machine 
code program you must have 
typed in the machine code 
entry program and have it 
saved onto tape or disk, When 
you want to enter any of the 


machine code programs that 


are printed out in the form 
used by this program you must 
LOAD it into your computer. 
When you RUN the program 
you will be asked for the start 
address of the program. The 
start address is the first number 
in any machine code listing that 
appears before the colon (e.g. 
49152:). You simply type in this 
number and press return. 

All that you have to do from 
then on is type in all the 
numbers ona line. Do not type 
any spaces and do not type 
return, the program will do all 
of that for you. If you have 
made a mistake on any line the 
computer will ask you to type 
the line again. Once the line is 
entered correctly the 
computer will automatically 
prompt you for the next line of 
data, 


Saving and Loading 


You can save your data to tape 
or disk at any time by simply 
entering the F1 key as the first 
character on any line. You will 
then be asked for the start and 
end address of the save. The 
start address is the first number 
in the listing as already 
mentioned. The end address is 
the number of the last line plus 
‘11. Don't forgettoadd 11 or the 
last line entered will not be 
saved. 

To load back a program that 
you have saved you simply 
have to enter the F3 key as the 
first*item on a line. You will 
then be asked for the name of 
the program. 


c 


eee ee ee eeece 


~~ i 


"@rromDURELL 


' 


LIST AID OPENS UP A NEW WORLD FOR 
programmers. No longer are you limited 
to using standard paper for your listing. 
Instead you can list your Basic programs to. 
any desired width (between one and 80 
columns) and asa bonus, you can choose 
either standard or double size characters 
and set the print head’s start position. 

There are several advantages using List 
Aid. For a start, listing a program 60 
columns wide, with the print head offset 
to 10 columns, gives a nice margin either 
side of the listing to make any notes etc. 
How about listing in 40 column mode, so 
the listing looks exactly as it would on the 
screen. You could use double size 
characters for any one with poor eyesight. 

List Aid itself requires 5K of memory to 
operate, Therefore, the only limitation is 
that your program must not occupy more 
than 33K, when the program is initially 
loaded into the computer. It doesn’t 
matter if your program requires more 
than 33K to run. 


it Aid 


Using 


First, type in the program exactly. You can 
leave the REMs out if you wish. Don't 
forget to SAVE it. Now run it. There are 
three questions to be answered, 

First, the character size. It’s preset for 
standard size. For double size press ‘D’ 
and ‘return’, otherwise just press ‘return’. 
Next select the width. This is the actual 
column size to be listed. Enter any size 
between one and 80 and press ‘return’. 
Finally the print head’s TAB setting is 
required. This is preset for now. Ifall goes 
well, will list itself! 

To list your program the following 
instructions must be followed exactly. 

First reset the computer by switching 
OFF and ON, or type in SYS 64738 and 
‘return’. Now load the program you wish 
to list. Remember, your program must not 
‘occupy more than 33K. Now type in the 
following one line direct statement and 
press return. Do make sure it is exact or 
you will have to load all over again. 


POKE 43,1:POKE 44,140:POKE 
140*256,0:NEW 


New? But, I just loaded it, | hear you say. 
Don’t worry, all will be revealed later. If 
you've done that correctly the computer 
will respond with ‘READY’. Now load List 
Aid, run itand your program will be listed. 
Don't forget to have your printer 
switched on and the paper all aligned. 

To list another program you will have 
to switch off and start again, 


So, what's the NEW all about then? 
Well, first you loaded your program. 
When a Basic program is loaded into the 
computer (which is just switched on), itis 
placed in memory from address 2049 
onwards. The computer knows, or thinks 

knows, where to place the program by 
looking at locations 43 and 44. The 
contents of these locations indicate 
where the Basic’s memory ‘BOTTOM’ is. 
In this case 2049. Before loading any 
program in, try this in direct mode: 


PRINT PEEK (43) + (44) * 256 


The result will be 2049. By raising the 
‘BOTTOM’ of memory above the area 
your program occupies, we can load a 
second program, List Aid, and run it, 
thereby not affecting the contents of your 
program. We do this by pokeing locatings 
43 and 44 with values to make the 


computer ‘think’ that the Basic memory 
now begins at address 35841, The ‘NEW’ 
command resets all the other Basic 
pointers accordingly. The values poked to 


43 and 44,1 and 140, ensure that the maxi- 

mum permissable RAM js available for 

your program, 33K, Before actually 
loading List Aid (after the pokes to 43 and 

44) type in: PRINT FRE(0) and ‘return’. You 

will see a return of 5119 bytes free, The 

POKE 140*256,0 ensures location 35840 

contains a zero, The first byte of Basic ram 

must be a zero. 
List Aid works progressively, following 
four fields. 

1. Work out the current line number and 
the link address pointing to the next 
line. 

Starting with its line number, 
concatenate a string variable repre- 
senting that line. Detect end of line 
upon reaching link address, 
Print routine. Send contents of string 
to printer, one character at a time, 
appropriately limited the print width, 
set TAB and Character size if required. 
. Check for ‘double zero byte’ 
indicating end of program. If not go to 
1 


= 


READY. 
CHRS(27)3 0 


READY. 
10 REM 
20 REM 
30 REN 
40 REM 488 TITLE SCREEN #44 

50 PRINTCHR$(147):POKES32@1,,6:PRINTCHR 
$1158) 

60 PRINTSPC(12)"Cs UILs ffs #1fs HEs 
Ws Mls Nfs fs H1fs Hes tls 17 
[st 

Ms 810s 1]":PRINTSPC(12) "Cs -)*SPC(13 
ICs =" 

70 PRINTSPC(12)"Cs -1 LIST..AID [5 - 
I*:PRINTSPC(12) "Cs -2*SPC(13)"C5 -1* 
80 PRINTSPC(12) "Cs 0 (4) *BY*SPC(5) 
RINTSPC(12)*Es -]"SPC(13) "Cs 


LIST. AID 
(C) BOB DAVIS JAN’BS 


90 PRINTSPC(12)*{s -] BOB DAVIS Cs - 
T*:PRINTSPC(12) "Cs -]*SPC(13)"Cs -3* 
100 PRINTSPC(12) "C5 -2"SPC(13) "Es -1) 
PRINTSPC(12)"Cs -1 (C) JAN 'B5 [s -1" 
110 PRINTSPC(12)*Cs -2*SPC(13)"Cs -]": 
PRINTSPC(12)*Cs JIEs t)fs t]{s t]Ls t) 
(st 

Ms Ws Mls #fs tls tls tls #15 
4105 K1*: PRINT: PRINT 

120 REX $88 PRINTER ON 7 448 

130 OPENS, 4: PRINT#4: IFSTTHENI110 

140 REM $48 INITIALISE 43% 

150 DIMKWS(75) ,CCS (160) sLN 
=2089 

180 FORL=0TO75: READKWS (L) :NEXT:607022¢ 
170 DATA END, FOR,NEXT, DATA, INPUT#, INP 
T,DIM,READ, LET, GOTO, RUN, IF, RESTORE, 60S 
UB 

180 DATA RETURN, REN,STOP,ON, WAIT, LOAD, 
SAVE, VERIFY, DEF, POKE, PRINTS, PRINT, CONT 
190 DATA LIST,CLR, CHD, SYS, OPEN, CLOSE, 6 
ET, NEW, TAB(, 10,FN, SPC(, THEN, NOT, STEP, + 


200 DATA $,/,*,AND,OR,,=.<, SGN, INT, AB 
8,USR, FRE,POS, SOR, RND,LOS,EXP,C0S,SIN, 
TAN 

210 DATA ATN, PEEK, LEN, STRS, VAL, ASC, CHR 
$,LEFTS, RIGHTS, MIDS, [255] 

220 READ D,D$:1FD=999THENS40 

230 REM RVSON RVSOFF 

240 CCS (D)="CRVSOND"+D$+*CRVSOFF": GOT 
0220 

250 DATA 5,*€",17, "0", 
"2 Pouca 

260 REM 48 DATA 129,"Ls Al* = SHIFT + 
At 

270 DATA 129,*Cs AI*:REN A 

280 DATA 133,"{s E1*sREN E 

290 DATA 134, "Cs FI":REN F 


BY) 


9,*5%,28 


300 DATA 135, "Cs G1" 
HO DATA 134,"Cs HI" 
320 DATA 137, "Es 11*REN 1 
330 DATA 138,*Cs J2* 
‘340 DATA 139, "Cs KI") 
350 DATA 140,*Es LI* 
360 DATA 144, "Es PI" 
370 DATA 145,"Cs a]¢ 
380 DATA 146, "Cs RI" 
390 DATA 147,"Cs S$)" 
400 DATA 148,°Cs G1": 
410 DATA 149, "Cs UI" 
420 DATA 150, "Cs WI" 
430 DATA 151,"Cs WI": 
440 DATA 152,"Cs x1" 
450 DATA 153,"Cs ¥}": 
460 DATA 154, "Cs 71" 
470 DATA 155,"[s #3" 
490 DATA 156, "fc -]" 
490 DATA 157, "Cs BI" 
500 DATA 158, "2553"; 
510 DATA 159,"Cc $]°:REN CBM + # 

520 DATA 999, 227 

530 REM HOME + 14 DOWN 

540 G$="CHOME]CDOWN] (DOWN CDOWN] (DOWN) 
(CDOWN2 CDOWN3 (DOWN DOWN COOWN]CDOWNICD 
OWN), 

DOWN] CDOWNICDOWN3* 

550 REM t¢8 INPUT DETAILS 141 

560 PRINTOS" SELECT CHARACTER WIDTH :C 
DOWN" 

‘570 REM RVSON/RVSOFF 3 X LEFT 

580 INPUT" CRVSONISCRVSOFFJTANDARD OR 
CRVSONIDIRVSOFFIOUBLE WIDTH  SCLEFTIE 
LEFT 

JELEFTI" SPS 

590 IFPS()*S*ANDPS<)*D*THENSEO 

600 REN 3 X DOWN 7 X LEFT 

610 PRINTO$: INPUT" CDOWNJCDOWNICDOWNI E 
NTER PRINT WIDTH {1 TO 80) CLEF 
TEL 
EFTICLEFTI(LEFTI(LEFTICLEFTICLEFTI*;PW 
620 IFPH=OORPW>BOTHENS1O 

630 L=80-PW: IFP$="D"THENL=B0-PW82 

640 IFLCLTHENPT=0: 6070690 

650 REM 6 X DOWN 3 X LEFT 

660 PRINTOS* CDOWN'1{ DOWN] (DOWN CDOWNIED 
COWNICDOWN] ENTER TAB SETTING (0 TO"L*T 
LEFT 


INPUT" OCLEFTIELEFTICLEFTI";PT 
870 TFPTCOURPT)L THENG6O 

480 -REN 9 X DOWN 

690 PRINTOS* {DOWN CDOWNCDOWN)CDOWN3LD 
OWNIEDOWNDCDOWNCDOWNICOGWN $¥ TO ABO 
aq, 

KEEP SPACE BAR PRESSED 11° 

700 REN 48% SET UP PRINT MODE t4t 
710 PH=15:1FPS="D*THENPH=14 

720 REM 448 CUSTOMISE QUOTE CHAR ttt 


730 Q$=CHRS (8): FORL=106: READD: O6=06+C 

HR$(D) :NEXT: O$=0$4CHR$ (15) 

740 DATA 128,135, 128, 135,128,128 

750 IFPH=14THENO$=CHRS (8) ; FORL=1T06: RE 

ADD: 05=0$+CHRS (D) s NEXT: GS=O8+CHRS (15) 

760 DATA 128,135, 135,128, 128,128 

770 REM #88 MAIN LOOP 488 

780 NL=(PEEK (LA+1) #256) #PEEK (LA) sLN=(P 

EEK (LAS) $256) +PEEK(LA¥2) : PACLA¥ 

790 PS=STRE(LN)+" * 

800 P=PEEK(PA) 

810 IFP=25STHENPS=PS+"(255]":G0TOP10 

820 IFP)L27THENPS=P$+KWS (P-128) :60T091 

0 

830 IFPC)34THEN9O0 

840 PS=PS+CHRS (34) : 6070880 

850 IFPCS2THENPS=PS#CCS (P: 

860 IFP>127ANDP(1LG0THENPS=P$+CC$(P) 260 

0880 

870 PS=PS+CHRS(P) 

80 PA=PAt1:P=PEEK (PA) : IFPA=NLTHEN93O 

890 IFPC>S4THENSSO 

900 PS=PS+CHRS(P) 

910 PA=PA+1: IFPACNLTHENOO 

920 REM 88% PRINTER ROUTINE $44 

930 L=LEN(P$) :PS=RIGHTS(PS,L-1) :L=L-2 
/G0SUB1080:FORM=1 TOL 


sTFMDS=CHR 


960 GETKS: IFKS<)**THENI140 

970 PRINT#4, CHRS(PH) ;: IFMDS=CHRS (34) TH 
ENGOSUB1OSO: 6070990 

980 PRINT#A, MD: 
790 IFPC=PWTHENPC=0: IFH<LTHENPRINT#4: 6 
0SUB10B0 

1000 NEXT:PRINTES 

1010 REN $48 LAST LINE 2 388 

1020 LA=NL: IFPEEK (LA) =OANDPEEK (LA+1)=0 
THEN 1140 

1030 GOTO780 

1040 REM $44 PRINT QUOTE CHARS #88 
1050 PRINT#4, O65: IFPM=14THENPRINT#A, OS 


1060. RETURN 

1070 REK 83% PRINT HEAD TABS $33 
1080 IFPT)OTHENFORTB=1TOPT: PRINT#4, CHR 
$15) EXT 

1090 RETURN 

1100 REM 44% END ROUTINE #88 

1110 FORL=0TO4:PRINTCHRS (147) : FORM=0TO 
200:NEXT 

1120 REM 12 ¥ DOWN RVSON/OFF 

1130 PRINT* CDOWN) CDOWN? (DOWN) (DOWN (D0 
WN) CDOWN2 (DOWN CDOWN] CDOWN (DOWN DOWN 
1000 

WN1"SPC(B) "8444 CRVSONIPRINTER NOT ONE 
RVSOFF] $84*:FORM=OT0400:NEXT:NEXT 
41140 PRINT#4: CLOSE4: END 


| 
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Hex-Calculator 

SOONER OR LATER, OWNERS 
of Commodore machines start 
to get tired of Basic and wish to. 
penetrate the mysterious world 
of machine code. A first step 
along this road entails getting 
to grips with the hexadecimal 
system in which the machine 


The hexadecimal system is 
based around aunit of 16 rather 
than the 10 that we are familiar 
with in our ‘10s and units’ 
system. In the hexadecimal 
system, the numbers zero to 
nine are represented by the 
digits 0-9 but the numbers 10- 
15 are represented by the 
letters A-F. Sixteen in the 
hexadecimal system is there- 
fore one hexadecimal unit 
(corresponding to our 10s) fol- 
lowed by no other units: hence 
16 decimal is 10 hex, 17 decimal 
is 11 hex, 34 decimal is (2* 16 + 


conventional to prefix a hex 
number with the $ sign as 
otherwise one might get con- 
fused as to whether a number 
such as 11 meant 11 in the 
decimal system or 17 in the 
hexadecimal system. The 
decimal notation is sometimes 
characterised by a # sign but 
very often by no signatall -this 
means that if you see a number 
by itself it is nearly always a 
decimal number but a hex 
number should always be pre- 
ceded by the $ sign. 

Once you get used to it, the 


venient way to think about the 
innards of your machine. For 
example, it makes much more 
sense to know that the Basic 
ROM for the C64 is located at 
$A000-$BFFF and that $C000- 
SCFFF is available for machine- 
language programs than to 
remember decimal (in which 
case the relevant numbers 
would be 40960-49151 and 
49152-53247!) Commodore 
machines often seem to take 
three steps forward but one 
step back. In the days of the 
Commodore PET, there was a 


code is written, 2) = 22 and so on. It is hexsystemisamuchmorecon- machine language monitor 
1 REM $88 HEX-CALCULATOR #84 100 REM RELOCATE CHANGES 
2: 110: 
SREM 8% MIKE HORT 34 120 AH=INT(A/256) :AL=A-AH#256 
4: 130 BHEINT(B/256) :BL=B-BHt256 
10 REM SYNTAX FOR HEX-CALCULATOR? IS:~ 140 POKE LOC#40, ALsPOKE LOC+41, AH 
M1: 150 POKE LOC#45, BL:POKE LOC+46, BH 
12 REN SYS(CALL),$=--~ ...SYS{CALL)---~ 160 POKE LOC#49, ALsPOKE LOC#SO, AH 
13 REM CALL=700 (BY DEFAULT) 170 POKE LOC#S3, BL:POKE LoceS4, BH 
4s 180 PRINT 
15 REM MACHINE~CODE HEX-LOADER 190 PRINT"--HEX-CALCULATOR LOADED-~*:ND 
16: 199: 


17 FOR J=320 TO 349:READ X:POKE J, X:NEXT 
18 DATA 140,0,177,26,201, 64, 144,2, 105, 8 
19 DATA 10,10, 10, 10, 133,2,200,177,24,201 
20 DATA 64,144,2,105,8, 41, 15,5,2,96 

3: 
40: 

50 CALL 
oor 

70 FOR 1=0 TO 88:READ HS:SYS 320 
80 POKE LOCI, PEEK (780) :NEXT 
9: 


CALL~21: A=LOC: Bath 


200 DATA 40 LSR 

201 DATA 48 Lsr 

202 DATA 4A LSR 

203 DATA 4A LSR 

204 DATA 29,0F — AND #80F 
205 DATA 18 coc 

206 DATA 69,30 ADC #830 
207 DATA C9,3A CHP 883A 
208 DATA 90,02 BCC $02B¢ 
§ 

209 DATA 69,06 ADC #806 


*PRINT DIGIT S/R 

"DIVIDE BYTE BY 16 

"AND GET INTEGER RESULT 
"BY FOUR LGR’S 

"WASK OFF OVER 15 

"CLEAR FLAG 

"ADD 48 TO GET ASCII CODE 
"MORE THAN 9 ? 

"NO - SO SKIP NEXT 2 BYTE 


"YES - SO ADD 7 


210 DATA 4C,D2,FF JMP $FFD2 :02B6 "PRINT & RETURN 

211 DATA 4C,D7,BD UMP $BDD7 :02B9 "PRINT FPAC#1 AS ASCII DI 
SIT 

212 DATA 20,73,00 JSR $0073 :02BC "ENTRY POINT - GET 1ST DI 
SIT 

‘2S DATA C?,24 CHP 4624 :02BF *IS IT $2 

214 DATA FO,1B  BEO $02DE :02C1 *YES - BRANCH (LINE 226) 
215 DATA A,24 — LDA #624 :02C3 "NO - SO PUT $ INTO .A 
216 DATA 20,D2,FF JSR $FFD2 :02C5 "AND PRINT IT 

217 DATA 20,8A,AD JSR $ADBA :02C8 “INPUT NUMBER 

218 DATA 20,F7,B7 JSR $B7F7 :02CB "CONVERT FPAC#! INTO 2 BY 
TES IN $14/815 

219 DATA 20,A7,02 JSR $02A7 :02CE ".A HOLDS MSB SO PRINT 1S 
T DIGIT 

220 DATA AS,15 LDA $15 :02D1 "RETRIEVE NSB 

221 DATA 20,AB,02 JSR $02AB :02D3 "PRINT 2ND DIGIT 

222 DATA 98 TYA 30206 "RETRIEVE LSB 

223 DATA 20,A7,02 JSR $02A7 :02D7 "PRINT 1ST DIGIT 

224 DATA 98 TYA 202DA "RETRIEVE LSB 

‘725 DATA 4C,AB,02 JMP $02AB :02DB "PRINT 2ND DIGIT AND RETU 
RN 

226 DATA 20,F7,B8 JSR SBEF7 :02DE *ZEROISE FPACHL 

227 DATA 20,73,00 JSR $0073 :02E1 "GET HEX DIGIT 

228 DATA FO,D3 —-BEO $02B9 :02E4 "DONE SO PRINT NO. AND EX 
TT (LINE 211) 

229 DATA C9,41 CHP #641 :02E6 "GREATER OR EQUAL TO A? 
230 DATA 90,02 BCC $02EC :02E *NO- SKIP 2 BYTES 

‘251 DATA E9,08 SBC #608 :02EA *YES- SUBTRACT 8 

232 DATA E9,2F © SBC #$2F :02EC "NO SUBTRACT 47 (+CARRY 
FLAG IF CLEAR) 

233 DATA 48 PHA 02EE "SAVE .A ON STACK 

254 DATA 20,0C,BC JSR $BCOC :02EF "TRANSFER FPACEL TO FPACE 
2 

35 DATA AO,10 LOY #810 :02F2 “PUT VALUE OF 16 

236 DATA 20,A2,B3 JSR $B3A2 :02F4 *INTO FPACEL 

237 DATA 20,2B,BA JSR $BAZB :02F7 "FPACHL X. FPAC#2 -RESULT 
IN FPACHL 

238 DATA 68 PLA 302FA "RESTORE .A 

239 DATA 20,7E,BD JSR SBD7E :02FB "ADD .A TO FPACEL 

240 DATA 50,E1  BVC $02E1 :02FF "LOOP ALWAYS FOR NEXT DIG 
IT (LINE 227) 

Ms 

M2: 

300 REM HEX-DECIMAL CONVERSION 

MO: 

320 REM INPUT "HEX=";HS$ 

330 REM D=0:FORJ=1 TO LEN(HS) 

340 REM X=ASC(MIDS (HS, J))-48 

350 REM D=D814+X+(X29) 17:NENT: PRINT D 

360: 

0: 

400 REM DECIMAL-HEX CONVERSION 

0: 

420 REM INPUT*DECIMAL=*;D 

SFORD=11043 K2=D/162 4=D-XU916 

}=CHRS (1448-78 1X9) ) +8 

450 REM D=X2:NEXT:PRINT'S*;HS 


written into the ROM which 
enabled one to getto grips with 
hex fairly easily but this facility 
was denied to the generation 
of C64 and Vic 20 owners who 
had to buy or get a machine- 
language monitor for their 
machines like Supermon, 

This month, the listing 
shows you how you can add a 
hexadecimal converter to your 
machine so that you can very 
quickly and easily input a 
decimal number and get its hex 
equivalent or input a hex num- 
ber and get its decimal 
equivalent. The whole routine 
is written to be as compact as 
possible and is designed to 
occupy the space from $02A7- 
$0277 - a total of 89 bytes which 
are absolutely safe and will not 
be corrupted by any other 
operations including loading in 
‘anew program on tape. In fact, 
the routine only just squeezes 
into the available space and is a 
result of my passion for nice 
tight and compact routines that 
just fit into the few spare safe 
locations. 

The listing actually contains 
two machine language 
programs and requires a little 
explanation so that you can 
follow what is going on! 

Lines 17-20 contain the 
decimal value for ashort (i.e. 30 
byte) hex-loading routine 
which greatly speeds up the 
process of converting hex 
values to decimal within the 
context of a Basic program such 
as this. As you can see, the main 
body of the program is 
contained in DATA statements 
from lines 200-240 and each 
line of DATA has one to three 
hexadecimal numbers fol- 
lowed by a 6502 mnemonic or 
op-code, an addressd and 
finally a comment. This is to 
enable the experienced 
machine code programmers 
amongst you to understand the 
construction process - 1 find 
that 1 always learn a lot from 
studying how other people 
have constructed their 
programs. These hex values are 
read into a variable H§ in line 70 
and then the first hex-loading 
routine is called at location 320, 
This is actually the bottom part 
of the stack and should be fairly 
safe unless you have 
mathematical routines with lots 
of brackets and/or many 
indented loops, all of which 
require a lot of stack space. The 
hex-loading routine, read in 


Programming 


lines 17-20, leaves the single 
byte decimal value that we 
require in the Accumulator. To 
access it, we merely PEEK(780) 
which the designers of the Vic 
and the C64 thoughtfully putin 
to enable us to access the 6502 
registers directly, Line 80 
obviously POKEs the converted 
hex value into the value of 
LOCH where LOC is decided 
by you, the user. 

So here, you actually have 
two decimal-hex converts 
within a single program. The 
main converter is designed to 
sit ina safe location where 
SYS(700),$---- or SYS(700),---~ 
will do the conversion job for 
you. If you precede your 
number by the $ sign then the 
converter will assume a hex 
number and will convert 
accordingly. This hex number 
can be of any (reasonable) 
length e.g. one to four digits. If 
you do not precede your 
number by a $ sign, then the 
converter will assume that you 
are inputting a decimal 
number and will convert it to 
hex for you. 

The initial hex-loader which 
is located in the stack is purely a 
refinement but processes 
numbers at four times the 
speed of the Basic equivalents. 
If you are still wedded to Basic 
then lines 300-450 show how to 
use fairly standard conversion 
routines. All routines, whether 
Basic or machine code have to 
cope with the fact that the 
ASCII values for A-F do not 
immediately follow the ASCII 
values for the digits 0-9 but are 
some eight locations later. 
Hence the necessity to engage 
in a process which works out 
whether the values A-F are 
involved in any part of the 
conversion process and then to 
make whatever additional 
adjustments are necessary. 


Changes for Vic 20 


Line C64 VIC. 20 
21 =BD DD 
27° AD CD 
m8 (B7 D7 
226 (BB DB 
Biss pe 
2360 -B3 D3 
237° «=BA ODA 
239 BD DD 


Substitute the relevant value 
for the VIC 20 in place of the 
C64 value in the specified line. 


cE 


c 


The Assembler Assembler Instructions 
Now we come to the third and There now follows a list of 
final program of the series, the PSEUDO INSTRUCTIONS that 
Assembler. This is a two pass are entered in field three. 
assembler which will accept 

source code from either the 
Macro Processor or direct from 
the Editor (assuming no 
MACRO definitions or calls are 
present) and will produce an 
executable machine code file. 
This means that all you will 
have to do torun your program 
will be toLOAD it by name and 
call it with a basic SYS 
command, For example: 


LOAD “filename”,8,1 
SYS (start address) 


During assembly, a listing is 
generated giving the object 
code and a list of symbols and 
their values. This may be sent to 
a printer by executing the TTY 
command before calling the 
Assembler. 


Entering the Code Assembler Operand 
Conventions 

There are five Basic listings 

given here. As before, type Field 4 operands have several 

them all in and save them symbols associated with them. 

before running. To save the Some may be familiar, but 

code, use either the Monitor S_ others may not. 

command <and>: These may be used to 

9000 and 9E00 as the specify which byte of a two- 

parameters, or use: byte number is to be loaded 
into an 8-bit register. For 

POKE43,0:POKE44,144:POKE example: 

45,0:POKE46,158:SAVE" 


‘ASSEMBLER”,8,1 LOOP1LDA#<LABEL 
POKE43,1:POKE44,8:NEW LDY #>LABEL 
To call the Assembler from —_Joads the A-register with the 
the Monitor, you should use —_jow-byte of the 16 bit value 
either: LABEL, while the Y-register 
is loaded with the high-byte. 
‘ASSEMBLER or The apostrophe is used 
ASSEMBLER (source file) to signify that an ASCII 
(object file) character is to be used as an 
operand eg. 


If you use the first option, the 
Assembler will prompt you F 

with ENTER FILENAME(s). You LOOP2LDA #’A 

should then enter the names of 

the files in the same format as __loads the A-register with 41 
the second option above. HEX, the ASCII code for A. 


MACH 


The percent symbol 
signifies that a binary 
number follows. For 
example: 


LOOP3LDX #%00000001 


loads the X-register with 1 
$: The dollar signifies that a 

hexadecimal number 

follows, For example: 


LOOP7LDA # $30 
LOOPBLDX $30 


If no symbol is used as a 
prefix then the number is 
assumed to be decimal and will 
be treated as such. Note that 


“the #”” in the above examples 


is the standard 6502 notation 
for an immediate number. 
When symbols are being 
used in field four, it is possible 
to add or subtract an offset 
using the - and + symbols. For 
example: 
VICI EQU $D000 
BORDER EQU VICI+$20 
SCREEN EQU — VICII+§21 
VICI 
vicii+2 
VICH-1 


This completes the descrip- 
tion of the assembler symbols 


and instruction, Next, we will 
assemble our MACOUT 
program which was generated 
with the Macro Processor. 


Assembling the 
Example Program 


With all three utility programs 
on your working disk, and the 
three example programs 
MACTEST, MACLIB and 
MACOUT on the same 
you are ready to assemble, 


Enter the monitor and type: 


ASSEMBLER MACOUT 
MACOB) 


The disk drive will begin 
working. After a few moments, 
the message: 


COMMODORE 64 UTILITY 
SERIES 

‘ASSEMBLER V1.0 

(C) 1985 $.D.C. 


will appear. If all goes well, the 
machine will generate a listing 
on the screen (or printer if you 
used TTY). After the 
machine will re-enter the 
Monitor. You now have a disk 
file called MACOB}. 

Exit the Monitor using the X 
command and type: 


NEW 
LOAD“MACOB)",8,1 
SYS 49152 


The program should act as 

described below: 

1 Clear the screen. 

2 Output a “your-name” 
prompt. 

3 Wait for keyboard input. 

4 Print what was input. 

5 Exit to Basic. 


Assembler Error 
Messages 


Ifan error is found, the approp- 
iate message is printed with a 
line number and the assembly 
is aborted. If an object file has 


3-MACH 


been created, it will be scratched. 


C64 Assembler 


Message 
REDEFINED SYMBOL 
TOO MANY SYMBOLS 
UNDEFINED SYMBOL 


BRANCH RANGE 

SYMBOL SYNTAX 

DIRECTIVE 

OPERAND OUT OF BOUNDS 


OPERAND SYNTAX 
ADDRESSING MODE 


NOT AN INSTRUCTION 
FILE NOT FOUND. 


SYMBOL TOO LONG 
MACRO DEFINITION 


MISSING OPERAND. 
FILE OPERATION 


Meaning 

a symbol appears in field 2 twice 
symbol workspace full 

a symbol does not appear in field 2 having 
been found in field 4 

relative branch was too big 

symbols only contain alphanumeric 
characters with the first character being 
alpha only 

a problem with a pseudo instruction 

a particular operand was too big for a 
particular addressing mode 

bad field 4 syntax 

illegal addressing mode for a particular 
instruction 

illegal field 3 string 

source file cannot be located on the 
current disk 

symbols are up to 9 characters long 
source contains MACRO symbols such 
as MAC and MND. Run the file on the 
Macro Processor first 

missing field 4 entry 

problem with the disk files such as a 
write-protect being ON 


operation via logical 


indicates an error cont 


the LOAD routine $FFDS, 


Next, | will give a program- Processor call, There is a field guide to help you. 


ming example for you to tryout 


The first MACRO LOAD 
SUB generates a subroutine 
which uses KERNAL ROM 
routines to performaLOADing 


file 


number LFN, device DEV with 
secondary address SEC. The file 
has a name NAME of length 
LEN. On return, a set carry flag 


ion. 


The X and Y registers hold the 
highest address loaded to by 


The second MACRO 
DOLOAD uses the MACRO 
LOADSUB as a subroutine. This 
is really not much different to 
LOADSUB on its own but is 


included here to show how 
MACRO calls can be nested. 


using this series of programs. 
Enter it using the Editor, call the 
Macro Processor and Assem- 
bler to work on it and try the 
program out. It will have a start 
address of $CO00 or 49152 
decimal. Simply use a Basic SYS 
49152, 


A Programming 
Example for the Utility 
Program Series 


There now follows a program- 
ming example designed to 
show how you can use 
MACROs in programs. Delete 
the previous program 
MACTEST, MACLIB, MACOUT 
and MACOBJ (unless you want 
to keep them) using the 
Monitor SCRATCH command. 

First, type in the following 
MACRO. library file which 
contains two different 
MACROs. Call it MACLIB or 
something similar. This will be 
the name you use for the 


FIELD1 FIELD2 FIELD3 
10 MAC 

20 L LOADSUB 
30 U LDA 

40 LDx 

5 LDy 

60 JSR 

70 LDA 

80 LDx 

90 Luby 

100 JSR 

10 LDA 

120 IMP 

130 FILSER TXT 

140 MND 

150 MAC 

160 ft DOLOAD 
170 L LDA 

180 Lby 

190 JSR 

200 IMP 

20 MES.SER TXT 

220 BYT 

230 LOADSUB1 LOADSUB 
240 MND. 


FIELD 


NAME,LEN,LFN,DEV, 
SEC 

# LEN 

# DEV 

# SEC 
SFFBA 

# LEN 
#<FILSER 
#>FILSER 
SFFBD 

#0 

$FFDS 
NAME 


NAME,LEN,LFN,DEV, 
SEC 

#< MES.SER 
#>MESSER 

SABIE 

LOADSUB1 
LOADING 

0 
NNAME,LEN,LFN, DEV, 
SEC 


= 


(macrolibraryfile) in the Macro 


cE 


i 


c- 


Having saved the MACRO 
library file to disk, re-enter the 
Monitor and type in the 
following program. Call this 
one anything you want. 


file names in the command. If 
you want to list your file to the 
printer, give the command 
TTY before calling the 
Assembler. 


FIELD1 | FIELD2 FIELD3 FIELD4 

10 ORG $C000 

20 BORDER EQU $0020 

30 LDA #15 

40 STA BORDER 

45 HELLO. 

50 LOADIT JSR GETFILE 

60 BCS ERROR 

70 RTS 

80 ERROR LDA # <ERRMESS 
90 LDY # > ERRMESS 
100 JSR SABIE 

10 RTS 

120 ERRMESS DT LOAD-ERROR 
130 BYT 0 

140 GETFILE DOLOAD | MACRO,5,1,8,255 
150 END 

160 MAC 

170 HELLO. 

180 LDA #893 

190 ISR $FFD2 

200 LDA #H 

210 JSR SFFD2 

220 LDA ca 

230 JSR SFFD2 

240 LDA #13 

250 JSR SFFD2 

260 MND. 


This program shows how 
MACRO definitions are tagged 
onto the end of source cade 
programs. The MACRO HELLO. 
is called in line 45 and 
generates code to clear the 
screen and print “HI”. The 
program then goes on to load 
the file on disk called MACRO 
and reports an error if itis not 
found. Once again, the 
MACRO DOLOAD generates a 
subroutine, while HELLO 
generates in-line code. 


Processing the Program 


Now call the Macro Processor 
with the following command: 


MACRO (yoursourcefile) (your 
outputfile) (yourlibraryfile) 


substituting the names of your 
files for the different para- 
meters. Assuming the files have 
been successfully processed, 
run the assembler with the 
command: 


ASSEMBLER (youroutputfile) 
(yourobjectfile) 


once again substituting your 


If you get an error during 
Macro Processing or during 
Assembly, check it against the 
error tables. The errors given 
by the Assembler are pretty 
reliable as are the Macro Pro- 
cessor errors. The only 
problem may occur during 
Macro Processing because of 
the fact that more than one 
source file is being used and 
the line-numbers don’t often 
correspond. However, if the 
error accurs in the source file 
(not the macro library file) then 
the number given in the error 
message should be accurate, 

| hope that you will find 
these programs useful to have 
and that they help any of you 
who are just starting out in 
machine code programming 
on the Commodore 64. The 
three programs took about 
four weeks to write (and about 
two weeks to debug!) and | am 
pretty sure that they are, forthe 
most part, error free. | am 
starting work on another 
version of the utility series 
which will allow both tape and 
multiple disk operation. If you 
encounter any bugs in the 
program, don’t hesitate to 


‘Assembler 1 


10 DATA 76,57, 156, 147,13, 67,79,77,77,79, 68, 79,82, 69, 32,54 
20 DATA 52,32,85,84,73, 76, 73,84,89, 32,85, 69,82,73, 69,85 

30 DATA 13,45, 83,83, 69, 77, 66,76, 69,82, 32,86, 49, 46,48, 13, 

40 DATA 40,67,41,32,49,57, 56,53, 32,83, 44, 68, 46, 67,46, 13, 

50 DATA 13, 0,69, 78,84, 69,82, 32,70, 73,76, 69, 78, 65,77, 69 

40 DATA 32,0, 13,65,83,83, 69,77, 66,76, 69,82,32, 69, 82,82 

10 DATA 79, 82,32, 76,79, 71,13,0,13, 10,13, 10,84, 65,66, 76 

80 DATA 69,32,79, 70, 32,83, 89,77, 64,79, 74,83, 32,85, 83, 69 

0 DATA 68, 13, 10, 13,10, 0, 13,10, 65, 85,83, 69,77, 66,76, 89 

100 DATA 32,76,73,83, 84, 73,78,71,13, 10, 13, 10,0,32,69,82 

110 DATA 82,79, 82,460, 82,69, 68,69, 70,73, 78, 69, 68, 32,83 

120 DATA 89,77,66,79,74,0,84, 79,79, 32,77, 65, 78,89, 32,83 
130 DATA 89,77, 66,79, 74,83, 0,85, 78, 68,69, 70, 73, 78, 69, 68 

140 DATA 32,83,89, 77, 66,79, 74,0, 66, 82,65, 78,67, 72,32,82 
150 DATA 65,78, 71,69, 0,85,89, 77,66, 79,76,32,83, 9, 78,84 

180 DATA 65, 88,0, 68, 73,82, 49, 67,84, 73,86, 69,0,79, 80, 69 

170 DATA 82, 65,78, 68, 32,79, 85,84, 32,79, 70,32, 66,79, 85,78 
180 DATA 68,83,0,79,80,69,82, 65,78, 68,32, 83,89, 78,84, 65 
190 DATA 88,0, 65, 68, 68,82, 49, 83,83, 73,78, 71,32,77, 79,68 
200 DATA 49,0,78,79, 84,32, 65,78, 32,73, 78,83, 4, 82,85, 67 
210 DATA 84,73,79, 78, 0,70, 73,76, 69,32, 78, 79,84, 32,70, 79 
220 DATA 85,78, 48, 0, 83,89, 77, 66,79, 76,32, 84,79, 79,32, 76 
230 DATA 79,78,71,0, 77,65, 67,82, 79,32, 68, 69,70, 73,78, 73 

240 DATA 84,73,79, 78,0,77, 73,83, 83, 73,78, 71,32, 79,80, 69 
250 DATA 82, 65,78, 68, 0, 70,73, 74,89,32,79,80,69,82, 65,04 

260 DATA 73,79, 78,0, 0,0, 165, 144, 182, 144, 199, 144, 216,144, 229 
M4 

270 DATA 243, 144,253, 144,19, 145,34, 145,50, 145,69, 145,04, 145 
9100, 145 

280 DATA 117,145, 133, 145, 255, 105, 101, 117,255, 109,125, 121,97 
113,255, 255 

290 DATA 41,37,53,255, 45, 61,57,33, 49,255, 10, 255, 6,22,255,18 
300 DATA 30,255, 255, 255, 255, 255, 255, 34, 55, 255, 44,255, 255, 2 
55, 255, 255 

310 DATA 255, 201, 197, 213, 255, 205, 21,217,193, 209, 255,255, 22 
4,228,255, 255 

320 DATA 236, 255,255, 255, 255,255, 255,192, 196,255,255, 204, 25 
5,255,255, 255 

330 DATA 255, 255,255, 198, 214,255, 206,222,255, 255,255, 255, 25 
5,73, 69,85 

340 DATA 255,77,93,89; 65,81, 255, 255, 255, 250, 24b, 255, 238, 254 
1255, 255 

350 DATA 255, 255, 255, 255, 255, 255, 255, 76, 255, 255, 255, 255, 108 
1255, 255, 255 

340 DATA 255, 255,32, 255,255, 255, 255, 255, 255, 169, 165, 181,255 
173, 189, 185 

‘370 DATA 161, 177, 255, 255, 162, 166, 255, 182, 174, 255,190,255, 25 
5,255, 255, 160 

380 DATA 164, 180, 255, 172, 188, 255, 255, 255, 255, 74, 255, 70, 6,2 
55,78, 94 

390 DATA 255, 255,255, 255, 255, 9,5, 21,255, 13,29,25,1,17,255,4 


2 

400 DATA 255, 38,54, 255, 46, 62, 55, 255,255,255, 106,255, 102, 11 
8,255, 110 

write into the magazine about answer or solution to the 
it, IIL try to reply as quickly as problem 

possible with, | hope, an | 


C64 Assembler 


410 DATA 126,255, 255, 255,255, 255, 233,229, 245, 258,237, 255,24 
9,225,241, 255 

420 DATA 255, 255, 153, 149, 255, 141, 157,153, 129, 145,255, 255,25 
5,134,255, 150 

480 DATA 142,255, 255, 255,255, 255,255, 255, 132,148, 255, 140,25 
5,255,255, 255 

440 DATA 66, 47,67, 66, 67,83, 66, 69,81, 66, 77,73, 66,7B, 69, 66 
450 DATA 80, 76,66, 86,67, 66,86, 83, 67,76, 67; 67,76, 68,47, 76 
460 DATA 73,47, 76,86, 68,89, 88, 68,69, 89, 73, 78,08, 73, 78, 89 
470 DATA 80,72, 65,80,72,80,80, 76, 65,80, 76, 80,82, 4,73, 82 
480 DATA 84,83, 85,69, 67,83, 49, 68,83, 69,73, 04,65, 88,04, 65 
1000 FORS=34864 TO 37631 
1010 READ A:POKES, A 
1020 NEXT 

1030 PRINT*FINISHED 1* 


Assembler 2 


10 DATA 89,84, 83,88, 84,88, 65,84, 88,83, 84, 89,65, 78, 79,80 

20 DATA 66, 82,75, 65, 68,67, 65,78, 68,65, 85,76, 6, 73,04, 67 

30 DATA 77,80, 67, 80,88, 67, 80,89, 68,69, 67,69, 79, 82,73, 78 

40 DATA 67,74, 77,80, 74,83,82, 76,68, 65,76, 68, 88, 76, 68,89 

50 DATA 76, 83,82,79,82, 65,82,79, 76,82,79,82,83, 66, 67,85 

40 DATA 84, 65,83, 04,88, 83,84, 89, 66,89, 84, 84,88, 4, 87,82 

70 DATA 68, 62 6b, 89,79, 82,71, 69,81, 85,69, 7B, 68,49, 88,84 

80 DATA 77, 65,47, 77,78, 68,68, 69,70, 144, 174, 240,48, 208, 16,80 

90 DATA 112,24, 216,88, 184,202, 134,232, 200, 72,8, 104,40, 64,9 

156 

100 DATA 248, 120,170, 168, 186, 138, 154, 152,234,0,0,11,22,33,4 
55 


F 
110 DATA 66, 77,88, 99, 110, 121, 132,143,154, 165, 176, 187, 198,20 
9,220,231 

120 DATA 242,32, 18, 130,32, 18, 130,32, 208, 255, 169, 10,162, 6,14 
1,32 

130 DATA 208, 142, 134, 2, 19,3, 140,144, 76,30, 171, 165, 1, 41,254 
133 

140 DATA 1,96, 165, 1,9, 1,133, 1,96, 160,0,177,57,170, 200,177 
150 DATA 57, 133,58, 134,57, 9, 169,0, 141,176, 2,141, 177, 2,141, 
178 

180 DATA 2,141, 64,3,141,80,3, 141,96,3,160,4,177, 122, 153, 60 
170 DATA 3,240,27, 200, 192, 14, 144,244,177, 122, 153, 66,3, 240, 1 
5,200 

180 DATA 192,24, 144, 244, 177, 122, 153, 72,3,240,3,200,208,246, 
160,0 

190 DATA 185, 64,3,32,30, 130, 144, 10,200, 192, 10,144, 243,162, 1 
2416 

200 DATA 38,155, 140, 174,2,201, 0,240, 40, 160, 0,185, 80,3,32,30 
240 DATA 130,144, 10,200,192, 10,144,243, 142, 10,76, 38, 155, 140 
4177,2 

220 DATA 201,0,240, 13, 160, 0, 185, 96,3, 240,3,200, 208, 248, 140, 
178 

230 DATA 2,9, 169, 64, 162, 3,133,122, 134,125,169, 2, 141, 184,2, 
240 DATA 169,80, 162,5, 133, 122, 134,123, 169,5, 141, 184, 2, 96, 16 
9496 


250 DATA 162,3,133, 122, 134,123, 169,4, 141, 184,2,96,32,121,0, 


260 DATA 162, 0,134, 2, 6,2,201,48, 240, 9, 201,49, 240,5, 162,8 » 


270 DATA 74,38, 155, 41,15,5,2, 133, 2,32, 115, 0,232, 224, 8, 208 

280 DATA 227, %,160,0,177,57, 153, 0,2, 200,192,4, 144,246,177, 
m0 DATA 153,0,2,240, 3,200, 208, 246, 169, 0,162,2, 133,122,134, 
FH DATA 96,1160, 0,177, 122,32, 19, 177, 176,5,162,5,76, 38, 155,2 
Ho DATA 65,240,247, 177, 122,32, 30, 130, 144 13, 153, 02,200, 19 
eae 144, 241, 162, 12,76, 38,155, 140, 185, 2,152, 24, 101,122, 
sa 165, 123, 105, 0, 133, 123, 96, 169, 0, 162, 160, 133,59, 134, 
Ta 203,147, 160, 0, 177,59, 208, 5,32, 210, 147,24, 96,205, 18 
S DATA 208,23, 162,0,200,200, 177,59, 221 ,0,2,208, 12,200,252 
oy DATA 183, 2,144, 242,32, 210, 147,56, 9, 169, 13, 24, 101,59, 13 
30 MTA 165, 60,105, 0, 133, 60,76, 18, 149, 32,98, 148, 32,209, 148 
a DATA 7,149, 8,532,203, 147, 40, 176, 60, 145, 59, 24, 105, 13,170, 
mn DATA 60, 105,0,201, 192,144, 10, 138,201, 0, 144,5, 162, 2,76,3 


400 DATA 155,160, 0,173, 183, 2, 145,59, 200, 169, 0, 145,59, 200, 16 


, 
410 DATA 189, 0,2,145,59,200, 232,286, 183,2, 144,244, 160,13, 16 
9,0 

420 DATA 145,59, 56,176, 1, 160,1,177,59, 240, 5, 162, 1, 76,38, 15 
5 


480 DATA 173, 184, 2, 201,2,240,5,32,210, 147,24, 96,32, 112,148, 
2 

440 DATA 104, 150, 176,5, 162,10, 76,38, 155, 224, 63, 144,5, 162,13 
17 

450 DATA 38,155,224, 61,208,26,32, 126, 148,32, 210, 147, 165,59, 
72, 165 

460 DATA 60, 72,32, 163, 151, 104, 133, 60,104, 133,59, 32,257, 149, 
54,96 

470 DATA 165,61, 146, 62, 133,20, 134, 21,32, 237, 149,24, 96,32,20 
3,147 

480 DATA 160, 11, 165,20, 145,59, 200, 165, 21, 145,59, 160, 1, 152, 1 
45,59 

1000 FORS=37632 TO 38399 
1010 READA:POKES,A 

1020 NEXT 

1030 PRINT*FINISHED 2* 


Assembler 3 

10 DATA 74,210,147, 32, 209, 148, 32,7, 149, 176, 2,24, 96, 32,208, 1 
” DATA 160,1,177,59, 208, 5,32, 210, 147,24, 96, 160, 11, 177,59, 1 
HH DATA 253,200, 177,59, 133, 254,32, 210, 147,32, 121,0, 201, 43,2 
ee 201,45, 208, 42,72, 32, 115, 0,32, 163, 151,104, 201,43, 208 
15 


c- 


c 


50 DATA 24, 165, 20, 101,253, 133,20, 165,21, 101,254, 133,21,56,9 
aa 253,56, 229, 20, 133, 20, 185, 254, 229, 21, 133, 21,56, 96, 16 
wath 166,254, 133,20, 134, 21,56, 96, 175, 177,2,201, 3, 208,55, 
Sint 176, 162, 146, 133, 251, 134, 252, 162, 0, 160, 0,177,251, 217 
saiteTa 208, 13,200, 192,3, 144, 244, 189, 121,147, 141,180, 2,56,9 
100 oth 224,87, 240, 16, 165,251, 24, 105, 3, 133, 251, 165,252, 105 
ein 252, 76,121, 150, 24, 96,177, 90,201, 255, 240, 3, 141, 180, 
Mth 162,9,76,38, 155, 32,112, 148, 32, 104, 150, 176,5, 162, 10 
0 DATA 38, 155, 24,8, 176,3, 169, 1, 96,224, 33, 176,3,169,2,96 
140 DATA 224, 54,174, 3,149, 3,94, 224, 64, 176, 3, 169, 4,96, 162,13 
150 DATA 76,38, 155,141,182, 2,152, 72,172, 181,2, 165,20, 153, 16 
te DATA 200, 173,182,2,201,1,240, 6, 145, 21, 153,160,3,200, 140 
in 2,104, 168, 94, 175,178, 2,240, 1,96, 162, 14,76, 38, 155,3 


180 DATA 4,151, 32,126, 148, 32, 163, 151,165, 21,240,5, 162, 7,76, 
38 
190 DATA 155,169, 1,32, 227, 150,32, 121,0,201,44, 208, 6,32, 115, 
0 


200 DATA 76,21, 151, 96,324,151, 32,126,148, 32, 163,151, 169, 2, 
zx 


210 DATA 227, 150, 32,121,0,201, 44, 208, 6,32, 115,0,76,58, 151,9 
2» DATA 32,4, 151,32, 126, 148, 180, 0, 185,96, 3, 153, 160,3, 240, 3 
230 DATA 200,208, 245, 140, 181, 2, 96,32, 4, 151,32, 126, 148, 32,16 
io mth 165,20, 166,21, 133,21, 134,20, 169, 2,32,227, 150, 32,12 
a DATA 201, 44,208, 6,32, 115, 0, 76,109, 151, 96,32,4, 151,32, 12 
uo DATA 148, 32, 163, 151, 165,20, 166, 21, 133,61, 135,63, 134,62, 
me ota 7b, 121, 0,169, 0, 133,20, 133, 21,32, 121, 0,201, 36,208, 1 


3 

280 DATA 32,115,0, 169,255, 141,174, 2,32, 21,130,56,96,201,37, 
208 

290 DATA 12,32, 115,0,32, 140, 148, 165, 2, 133, 20,56, 96, 201, 60,2 
40 

300 DATA 4,201, 62, 208, 36, 72,32, 115, 0,32, 163, 151, 176, 12, 173, 
179 

310 DATA 2,201, 1,240, 5, 162, 3, 76, 38,155, 104,201, 60,240, 4, 165 
320 DATA 21,133, 20, 169, 0, 133, 21,56, 96,32, 27, 130, 144, 10, 149, 
) 

380 DATA 141,174, 2,32, 21, 130, 56, %, 201, 39, 208, 10,32, 115, 0,1 
3B 

340 DATA 20,32, 115,0,56, 96, 32,19, 177,176,5, 142,5,76, 38, 155 
350 DATA 32,3, 150, 144, 1,96, 173,179, 2,201, 1,208, 2,24, 96, 162 
360 DATA 3, 76,38, 155, 169, 0, 141, 181,2,32, 112, 148,32, 181, 150, 
201 


370 DATA 4, 208,3, 76, 158, 152,201, 2,208, 4,149, 1,208, 13, 01,1 
380 DATA 208, 6, 32,211, 152,76, 91, 152,32, 33,153, 141, 182, 2,173 
1180 
390 DATA 2, 160, 0, 153, 160,3, 200, 204, 182, 2,240, 17, 145,20, 153, 
160 
400 DATA 3, 200,204, 182,2, 240, 6, 165, 21, 153, 140, 3,200, 140, 181 


, 
‘410 DATA 173, 181,2,240, 24,173, 179, 2,201, 2,208, 3,32, 33, 156,2 
4 

420 DATA 173, 181,2, 101,61,133, 61, 165,62, 105, 0,133, 62,96, 224 


ao DATA 208, 6,32,15,151, 76,205, 152,224, 58, 208, 6, 32,52, 151, 
a DATA 205, 152, 224,57, 208, 6,32, 80, 151, 76, 205, 152, 224,59,2 
et omn 32, 103, 151, 76,205, 152, 224, 60, 208, 3, 32,139, 151, 172, 
it anh 1b, 125, 152,32, 4, 151,173,179, 2,201, 2,240, 3, 169, 2,96 
470 DATA 32,126, 148,32, 143, 151, 165, 21,208, 3,76, 22,153, 165,6 


1, 

480 DATA 105,2, 133, 253, 165, 62, 105, 0, 133,254, 165, 20,56, 229, 2 
53,133 

1000 FORS=38400 TO 39167 

1010 READA:POKES, A 

1020 NEXT 

1030 PRINT*FINISHED 3° a 


Assembler 4 


10 DATA 20, 165,721,229, 254, 240, 9, 201,255,240, 14,162, 4,76, 38, 
155 

20 DATA 165,20, 201, 128, 176, 245, 16,2, 96, 165, 20,201,128, 144, 
236,176 

30 DATA 245,169, 180, 24, 109, 180, 2,133, 90, 169, 145, 105, 0, 133, 9 
1,32 

40 DATA 4, 151,32, 126,148, 32, 121,0,201,65, 208, 21,32, 115, 0,32 
50 DATA 30,130, 176,8, 140, 0,32, 166, 150, 169, 1, 96, 162,5,76, 38 
40 DATA 155,201,35,208, 25,32, 115,032,163, 151, 144, 14,145, 21 
1240 

70 DATA 5,162,7,76,38, 155,160, 1,32, 166, 150, 169, 2,96, 201,40 
80 DATA 208, 3,76, 3,154,173, 179,2,201,2,240, 14, 173, 180, 2,201 
90 DATA 121,240, 4,201, 110,208, 3, 169,3,96,32, 143, 151, 176,3,1 
69 

100 DATA 3, %, 165,21, 208, 64,32, 121, 0,201, 44, 240,27, 173,180, 
2 

110 DATA 201, 110, 240,4, 201, 121, 208, 8 160,'5, 32, 166, 150, 169,3 
1% 

120 DATA 160,2,32, 166,150, 169, 2,96,32,115, 0, 201,88,240,9,20 
1 


130 DATA 89,240, 8, 142, 8, 74,38, 155, 160,3,44, 160, 4,32, 164,150 
140 DATA 32, 115,0,169,2, 96,32, 121,0,201,44, 240, 8, 160,5,32 
150 DATA 166, 150, 169, 3, 96,32, 115, 0, 201,88, 240,9, 201,89, 240, 
8 

160 DATA 162,8,76,38, 155, 160, 6, 44,160, 7,32, 146, 150,32, 115,0 
170 DATA 149,3,96,32, 115, 0,32, 165, 151,32, 121,0,201, 44, 240,5 


9 
1B0 DATA 201,41, 240,5, 162, 8, 76,38, 155, 32,115,0, 201,44, 240, 
1 


C64 Assembler} 


190 DATA 160, 10,32, 166, 150,32, 115, 0,169, 3, 96,32, 115, 0, 201,8 
9 
200 DATA 240, 5, 162, 8, 76,38, 155, 165,21, 240,5,162,7,76,38, 155 
210 DATA 160, 9,32, 166, 150, 32, 115, 0, 169, 2, 96, 32, 115, 0, 201, 88 
220 DATA 240,5, 162,8, 76,38, 155, 32,115, 0,201,41, 208, 244, 165, 
rT 
230 DATA 240,5, 162, 7, 76,38, 155, 160,8,32, 166, 150,32, 115, 0,16 
9 


240 DATA 2,96, 32,121, 0,208, 19, 169, 6, 160, 144,32,30,171,32)9 
6 


280 DATA 165, 134, 122, 132, 125,32, 115, 0,240,282, 32, 9, 130, 142, 
224,2 

260 DATA 132, 251, 160, 2, 132, 252, 160, 0,177,251, 153,225,2,200, 
204,224 

270 DATA 2,144, 245,32, 121, 0,32,9, 130,142, 240, 2,132, 251, 160, 


2 
280 DATA 132,252, 160, 0,177, 251, 155, 244, 2, 200, 204, 240,2, 148, 
245, 189 

250 DATA (64,162, 48, 160,58, 141, 241, 2, 142, 242, 2, 140,243, 2,174 
1240 

300 DATA 2,169, 44, 157,244, 2,252,252, 157,244, 2,202, 149,80, 15 
7,246 

310 DATA 2,232,252, 169, 87,157,244, 2,252, 282,252, 252, 142,240 
2,96 

520 DATA 173,0,3,174,1,3,141, 60,3, 142,61, 3,169, 28,162, 155 
380 DATA 141,0,3, 142, 1,3, 96,173, 60, 3, 174, 61,3, 141,0,3 

340 DATA 142,1, 3,96,32, 204, 255, 169, 3,76, 195,255,224, 11, 208, 
4 

+] 350 DATA 162,8, 208, 2, 162, 7, 134, 2,32, 210, 147,32,20, 155, 32,7 
360 DATA 135,32, 1,156, 169,82, 140, 144,32, 30,171, 165,2,10, 170 
189 

‘370 DATA 148, 145, 188, 149, 145,32, 30, 171, 169, 157, 160,144, 32,3 
0,171,160 

380 DATA 2, 177,57, 170,200, 177,57, 133,58, 134,57,32, 194, 189, 1 
49,1 

390 DATA 141, 174,2, 162, 26, 108, 0,3, 165, 43, 166, 44, 133,57, 134, 
58 

400 DATA 169, 0,133,463, 133, 61,133, 64, 133, 62,32, 178, 148, 160, 1 
177 

410 DATA 57,240, 34,32, 230, 147, 173, 179, 2,201, 1, 208, 10,173,17 
6,2 

420 DATA 240,5,32,73, 149, 176,8,173,177,2,240,3,32,52, 152,32 
430 DATA 217,147, 76,122, 155, 96, 169, 1, 162,8, 160, 1,32, 186, 255 
173 

440 DATA 224,2,162,225, 160,2,32, 189, 255, 24, 169, 0,32, 213,255 
117% 


450 DATA 59,96, 169, 3, 162, 8, 160,3,32, 186, 255,173, 240,2,162,2 


460 DATA 160,2,32, 189,255, 24, 32, 192,255, 176, 33,32, 235, 155, 1 
45,63 

470 DATA 32,240, 155, 165, 64,32, 240, 155, 76,204, 255,162, 3, 76,2 
01,255 

480 DATA 32,210,255, 32, 183, 255, 208, 1,96, 32,20, 155, 162, 15,76 
38 

1000 FORS=39148 TO 39935 
1010 READ A:POKES, A 

1020 NEXT 


1030 PRINT"FINISHED 4" Lad 


Assembler 5 

10 DATA 155, 162, 15,32,201,255, 169,85, 141,241,2, 174,240, 2,20 
2,202 

20 DATA 202,202, 169, 0,157,241, 2,169, 241, 160,2,32,30, 171,76, 
204 

30 DATA 255,532,235, 155, 162, 0,189, 160,3,32, 240, 155,282, 236, 1 
81,2 

40 DATA 144,244, 32,204, 255, 32,201, 154, 96,32, 177, 147,32, 36,1 
30,32 

50 DATA 240, 154,32, 114, 154,32, 166, 155,149, 0,162, 160,133,251 
1134, 252 

40 DATA 160,0, 152, 145,251, 169, 1, 161,179,2,32, 104, 155,32, 165, 


15 
70 DATA 32,194, 155, 238, 179, 2,32, 104, 155, 32,57, 157,32, 20, 155 
132 

80 DATA 7,155, 162, 15, 32,195,255, 169, 1, 141,174,2,76,0, 130, 20 
1 


90 DATA 10, 144, 3, 105,54, 96, 9, 48, 96, 72, 74,74, 74,74, 32,127 
100 DATA 154,157,0,2, 104,41, 15, 232,32, 127, 156, 157,0,2,232,9 
6 

110 DATA 169,0,157,0,2,173, 175, 2,240,5, 162, 200,32,201,255, 1 
9 

120 DATA 0,160,2,32,30, 171,32, 18,130, 76, 204, 255, 162,0,149,3 
2 


130 DATA 157,0,2,232, 224,80, 144, 48, 6,32, 188, 156, 162,0, 145 
482 

140 DATA 32, 137, 156, 165, 61,32, 137, 156, 173, 181,2,240,23, 201, 
314 

150 DATA 2,169,3, 133, 94, 162,5, 160,0, 185, 160,3,32, 137, 154,20 
0 


160 DATA 196,94, 144, 245, 173, 176, 2,240, 17, 162, 12, 160,0,185,6 
4,3 
170 DATA 157,0,2,252, 200,204, 176, 2, 144,243,173, 177,2,240,17 
1162 


180 DATA 22, 160,0,185,80,3,157,0,2,232, 200,204, 177,2, 144,24 
3 


190 DATA 175,178,2,240, 17, 162, 32,160, 0,185, 6, 3, 157,0,2,232 
200 DATA 200,204, 178,2, 144, 243, 76, 160, 156, 169,0, 162, 160, 133 
4251, 134 

210 DATA 252,173, 175,2,240,5, 162, 200, 32,201,255, 169, 104, 160 
144,32 

220 DATA 30,171,532, 204, 255, 32,203,147, 160,0,177,251,208,4,3 
2,210 

250 DATA 147, 9%, 133,2,32, 188, 156, 200,200, 162, 0,177,251, 157, 
0,2 

2N0 DATA 200,282, 228, 2,144,245, 162,11, 169, 61, 157,0,2, 162, 13 
160 

250 DATA 12,177,251, 32, 137, 156, 136, 177,251, 32,137, 156,169, 1 
3,24, 101 

260 DATA 251, 133, 251, 165, 252, 105, 0, 133, 252,32, 210,147,32,16 
0, 156,32 

270 DATA 203, 147, 76,88, 157, 173, 175, 2,240, 5, 162,200, 32, 201,2 
55, 169 

280 DATA 134, 160,144, 32,30, 171, 76,204, 255, 
1000 FORS=39936 TO 40376 

1010 READA: POKES, A 

1020 NEXT 


1030 PRINT*FINISHED THE LOT!" a 
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YOUR COMMODORE 
01-437 0699 


Lineage: 40p per word 8 = 
Semi display: £9.00 per single column centimetre 


Ring for information on series bookings/discounts. 


All advertisements in this section must be prepaid 
Advertisements are accepted subject to the terms and conditions 
printed on the advertisement rate card (available on request). 


HARDWARE 


EXT. 322 


Send your 


requirements to: 


STUART TAYLOR 
ASP LTD, 1 GOLDEN SQUARE, 
LONDON Wi 


NEW STAR SG-10C PRINTER 


ONLY £249 TO INCLUDE VAT & NEXT DAY 
DELIVERY BY SECURICOR 


100% compatibie with your Commodare computer 
120cps draft mode 

Tractor and friction feed standard, 

Near Letter Quality made included 

192 graphic mode character 

192 business mode characters, 
90 italic characters 

90 NLQ characters 

Notmal 80 cpl. Condensed 136 cpt 
Enlarged 2x. ax & 4X 

Supplied with intertacelcable and mai 


STRONG COMPUTER SYSTEMS 
‘BRYNA COTTAGE, PENIEL, CARMARTHEN, DYFED SA32 70J 
TEL: (0267) 231246 FOR ASSISTANCE!!! cea 


plug READY TO GO 


* BACK-UP-SYSTEMS FOR CBM-64 & VIC-20 « 
‘The BACK-UP-BOARD Mk. 1 ls the fastest, and easiest way to back up your tape 
programs. With this board you can connect a second CBM cassate deck ta your 
omputer You can copy a program on the seca! deck whilst criginsioadsom 
the first. Vou can back up all fas loaders, data lies, ele: BACK-UP-BOARD Mk. 1 
1000 ine PAP. 
BACK-UP-BOARD Mk. 2. This new version of out tamous BACK-UP-BOARD is now 
proving so popular I's ouloling our anginal Mc "This new board now works two, 
faye: Switched to NORMAL’ ltoperates asthe Mk 1. Switched fo GENERATE. be 
‘Owners ear use ourepecal raster seftware to regenerates copy ofa program onthe 
Scand dock as load rem te rst. Ths methos ean progues a beter Guay Copy 
than the orginal. BACK-UP-BOAAD Mk. 2 & Software '14 50 inc. PAP, Conversion 
Service. Raturn your M1 Board. H purchased rom us, tbe modified {0 Mk 2 fOr 
X50 cluding software & PAP. 
AZIMUTH HEAD ALIGNMENT TAPE by INTERCEPTOR for 6. Use this test tape 
{wih your 64'1o adjust he neads of your decks to makea perfectly matched pair Full 
instructions and serewriver upped £850 in, PAP. 
ROM SWITCH/RESET BOARD. Fit his board in the expansion port of your'6’ and 
you can reset ALL programs, Resets programe that standard fsel switch can. A 
Zocket fora 2784 8K eprom Is also fitted Ful irsiructions supplied EBS inc PAP. 
Please send SAE for more details of the above products. Send your cheque/PO to: 
TURBOTRONIC 

46 Ripon St., Parkinson Lane, Halifax, West Yorkshire HX1 3UG. 

4 Tel: (6422) 52020 

(Europe add 50p outside Europe add £1.50) 


COMMODORE 64 DATABASE — DATAFILE 


Powerful options include: print al/salective records, delete, amend, save, load 
copy. alphonumenc sort, user dafined fields, memory check, total numeric 


fields, mut field intorrelational, global and between limits searches, etc. Fully 
fmenu driven with comprehensive, easy to use instructions, 

aM 64 (compiled) coscette £7.45 
(CBM 64 (compiled) ‘isk £10.45, 


COMMODORE 64 WORDPRO — TEXTFILE 
Powerlul word processor, facilities include — large text butler, auto centre, 
varable tab, insert, amend, delete, copy, move text, ward count, nght justly 
aging, join files, multiple handing. print alipart text, et. Fully driven with 
Comprehensive, easy to use instructions, Great value 
CBM 68 compiled} cassette £8.25, 
CBM 64 (compiled) isk €10.75, 
All programs with full documentation and guarantee and can be used with al 
direct connect CBM 64 printers including, 1820 printiplotter. Also most 
envonies (with sutiable hardware interface). Price mcludes fast delivery bY 
first clase post. Cheques/POs to: 


A&C SOFTWARE 
Dept. 4, 75 Oakthorpe Gardens, Tividale, West Midlands 869 2LF 


Telephone: 021-557 8596 (7.9m) 


Super Breaker 
Back-Up Board 


For the Commodore 6¢, CBM 128 and 
Vig-29. When 8 second CBM type cat 
Sette unit fs connected fo the Board 
‘mil make security back-up copies of 
asetie bated sofware, inleuding 
Turbo/FastLosders,” Basle’ andyot 
Machine ‘Coe and” Dats’ fies" No 
Akitional software js needed. Very 
User Friendly "the back-up copy. 
‘made on the second casseite whe the 
Griginal loading on the frst Price a 
£885 Pus PAP. 


RESET CARTRIDGE for CBM 64. This 
artetdge wl rose al. yor al mamary 
cident programs. Including all pro 
frame whore standard reset switches 
fa Prce £1 98 PRP, 
(Gt REPAIRS. Fast ralabe repairs, six 
months warranty on replaced parts 
{E14 95t0€28 75ine part labour PAP, 
insurance? VAT 
PP 55p UK (Europe sc £1.00, else 
‘where ad £200) Sond cheque! postal 
‘ordar, ofa stamp for detail, fo 
C. Kent, 26 Northcape Walk, 
Corby, Northants. N18 90d. 
For enguires telephone (0536) 742622 


PROM-64 
EPROM programmer for 8K, 16K, 
ZIF socket, Vpp generator & 


Software on tape £34.75 

G4-CARTridge, 28K £5.95, 

DEMO EPROM 8k £4.95 

DHOBI-2 EPROM eraser £22.95 
UK + 15% VAT 


Cambridge Microelectronics 
One Milton Road, Cambridge 
CB4 1UY 
Tet: (0223) 314814 Thx: 81574 


| ACCESSORIES. | 


PERIPHERAL BARGAINS 
Quickshot Il Joystick £8.75 
Gunshot Il Joystick £8.75 
C-16 adaptor (for above) £3.95, 
Reset switch (VIC 20/ 
CBM 64) £3.95 
Will reset all m-code programs, 
Price includes Basic reco 
program, 
Copier CP1 Digital interface 
Copies all Turbos, m/code, etc. 
IC controlled. No. software 
needed. Just type load, If it 
loads, CP1 willcopy it Requires 
second datasette. 12 months 
guarantee £3.50, 
Free P&P UK, Europe add 
£1.50, rest add £2.50, 
Send Ch/PO to: 
DATALINE 
246 Horbury Rd. 
Wakefield WF2 8RE. 


CLASSIFIED ADVERTISING 
TERMS & CONDITIONS 


THE CLASSIFIED DEPT. UH, 
No: GOLDEN SQUARE. LONDON, 
WIR 248. 


Government regulations. concerning 
Vat Aavertsart 


(Dhaclonure) Order 

une Tenis. & CONDITIONS OF 

ADVERTISING: AVAILABLE ON 
heaves 


SOFTWARE 


APPLICATIONS 


HOME ACCOUNTS 


Put your house in order! 
Probably hame computing’s 
best use! Comprehensive 
coverage of bank accounts. 
Credit cards, HP in-built 
accuracy check. Reocrds all 
transactions. Projects cash. 
flow for any period ahead, 
Available for C.16 CBM64 or 
VIC-20. £8.45 or free details 
from: 


Discus Software 
Freepost, 
Beach Approach 
Brixham TQS 8BR 
Tel: 08045 55532 


ITC . . . inflation-fighting prices. 
Soft & Hardware at NEVER SEEN. 
prices! Order our catalogue al 
£2.75 (refundable with order), ITC, 
Software Division-YC, Box 414, 
4200 AK Hilversum, NETHER: 
LANDS. Access, Barclay. 
American Express, Diners Club 
accepted. Siate number & expira 
tion date. 


Hitachi 2764 250ns (6K) 
1-2 pieces £3.95, 3+ £3.50 
Price includes VAT, P&P. 


SILICON CITY, Dept Y. 
1, Milton Rd., Cambridge, CB4 
‘wy. 


‘Access/Visa Tel: 0223 312453, 


SOFTWARE LIBRARIES ee FORHIRE 


MILAN CBCOMPLUTER] "STAFFS COMPUTER LIBRARY" | 


LIBRARY CBM 64 OWNERS 
ATTENTION COMMODORE 64/128 USERS photon onrick han we wil sarle Wes etitacabotne 
A SUBSIDIARY OF PLATINUM GOLD (Games only) 
© All the latest Titles 
OVER 4,000 different titles available for hire for the COM- @ Full 7 Days Hire 
MODORE, SPECTRUM, BBC, AMSTRAD, ATARI, and © Low Hire Cost. From 75p 
MSX computers. Sicmaanon 
* ARCADE, ADVENTURE, EDUCATIONAL and BUSI- e fee arpencss, Titles 
© Low Hard and Software prices 
eee Oley © Membership ONLY £5.00. 


HIRE PRICES from only 75p INC. P&P. 
20% DISCOUNT off all purchase software Send your cheques/postal orders payable to: 
z STAFF COMPUTERS 

WEE CATALOGUES: The Newlands, Greensome Lane, Stafford 
FREE HINTS AND TIPS. 


* FAST RETURN OF POST SERVICE (if reserves are | COMMODORE 64 casselte 


Free mic Monitor on joining 


given), library. Hire latest games iia ces en 

ia educational software, only one ire & Exchange Software. 

* ALL GAMES manufactures ORIGINALS with full price £1.50 per cassette 7 days | Exchange you ftvare! Phone or 

doeumenton Maal alee “Tor deta, Soteeare het No- 
9 Darrell Way 

* OVER 6,000 satistied members 1a/Bierel Were membership charge. P&P free 


tapes from £1,30. Phone for d 
* EUROPEAN members welcome. Talbiualiee uiee Kead: 


* Fully computerised system keeps track of your order, We EDUCATIONA! Siemens Dees: setey Nore Yor, 
pride ourselves in being the most professional Hire Library SOFTWARE 


inthe United Kingdom, with staff of 14 who knows what the 


word service means. Backed by our own software com: WORD 
pany and programmers. DO YOU READ ME? PROCESSOR 
| == 


aegis | 


| sa college Street, Worcester WR1 218. Tel: 0305 611072 | | Speed reading course for | FANN. Mrunencire ar 

ollege i Worcester ta children aged 10+ on] 64 ¢g9 cach’ ing PAP. val ext 
| Please enclose £6 for Life Membership or send a SAE for fre catalogue ! GBM 64, Cassette or disk |  i2,SAch. ne: PAR, vat axa 
i eae J | (9541) £10. Ch/POs or | Uo, Andale, Ca 

: Vi84TD. Te 
| Aedes [| SAE for details to:- 8951 182 Gecoms 
i om] = | S. HARCOURT, BOOKS & 
' =a 17, The Moorings, PUBLICATION 
orth Lancing, 


‘Sussex BN15 OPP 


We use only 

10% of our 
es freee 

potentials 


SEVEN SUPER GAMES FOR THE 
C64 ONLY £12 ASTROLOGY 


ROXINGIFORTERS aes (or wanneeeeeatand sa"? ne i roe aaa tt Cra 

pack for only £1150, Consisis pe SUNT ma en 

CAR RACER BATTLESHIP Of a simple programme to S oie'tot gon Ses"n as 
calculate a _foroscope, an 
SPACE RUN LADDER CHASE intraductory booklet and 2 self. 
teaching programmes (how to 

Bee, interpret the horoscope). SS cee aa 

Super Seven games for only £12 on one cassette. NO PREVIOUS ee Le eee fe ee 

payee alg ee eau ey aon KNOWLEDGE REQUIRED rat ie 
ayment must be made by cheque or postal order payable to: hor ine Commmansene many TAS fort, a yur ey 
JOSEPH MUSCAT, “Lourdes House”, Fisher Road, Mgarr, Malta, other micros, also wide range ack Make cho and POS’ pale 19 


of programmes for more 
Experienced Astrologers Ee Slee aL a Ae 
Cash with order (add 50p out inp one 
side UK) or large SAE for free 

Catalogue to. 


[]_ | _ASTROCALC (Dept Yc), 
67 Peascroft Road, Hemel 


Hempstead, Herts HP3 SER. 
MOONRAKER £6.95 


RING Tel: (0442) 51809. 


STUART TAYLOR 

FOR CLASSIFIED | SUNT ME [Erte oo cies 
od Gi POV ERTISE MELTS eas nee. Ja Eciimour Li 
Dept YC106, 4 Copse Close, Liss, tion on how to obtain Vortax Dest 1069 seis Cop 


Mar 


ire GU3S 7EW, England 


a Hampshire GU33 7EW, England. 


‘Synthesizer andmodem tor Vic-20. "Ti: 0730-809660. 


Call Mr Thompson 0282-81 5292 


‘Commodore 64—£15,vic20 | | sav ‘Kennedy Approach 
— £12.50, Spectrum — (35, Sabre Woll&7 90, Unaerwurioe 
£10.50, OL — £30, 1541 Disk ‘Show £8.65. Cheque/PO. 
Drives’ — £20, and all Com- Sottware Unlimited, PO Box 5, 
modore systems, Send faulty ised 
machine with note describing ulti der Sot 0742 749498 
Above pricas include parts, fault to: 

post & packing, 
All repairs are guaranteed 3] | TRIDENT ENTERPRISES 
months, Callin or phone for more LTD BS 


Zz 
etal, 7 UNDEN HOUSE, COMMON ROAD, 4, : 
MINNIE MICRO ELECTRONICS LANGLEY, SLOUGH | BE a 
112 EASTERN ESPLANADE, ‘fe: ovs3 e708 
THY. chine Live 
Sc 


SOUTHEND, ESSEX. 
Tel: (0702) 62033/615809 


OPEN 7 DAYS A WEEK. 


EXPRESS __ 02 
COMMODORE *™ 
REPAIRS! 


‘have come across a frm that wil be more than wiling to advise you as to how to 
TANCOMP, and as well a repating Yauly 
opine wth you, an fer 
nly cheap, and (MGAE IMPORTANTLY) correct cure 
hit Rogers Peek & Poke’ “Popular Computing Weekly” dan. 1985 (VoL. IV, No.1) 


*Send Commodore encl. £3.00 return postage (UK). *Or phone/ 


being) Commodore forge, no obligation estimate. +Every WHY NOT ADVERTISE 

mmmodore sent insured and by receipt 

i sommodore ser ure uae teeep fed parcel post (UK). IN OUR CLASSIFIED 
MANCOMP LTD. (Dept YC 12), SECTION? 


Printworks Lane, Manchester M19 3JP. 


Phone 061-224 1888/9888 
Open 9am till 7pm Mon. to Sat. 


YOUR COMMODORE — CLASSIFIED ADVERTISEMENT — ORDER FORM 


Advertise nationally in these 
columns for only 40p per word (min 
charge 15 words). Simply print your 
message in the coupon and send 
with your cheque or postal order 
made payable to Argus Specialist 
Publications Ltd to: . 


CLASSIFIED DEPARTMENT 
YOUR COMMODORE 


No 1 Golden Square, London W1 
Tel: 01-437 0699 


Name.. 
Address. 


Tel no (day)... 


1 39 


ADVERTISERS PLEASE ADD 15% VAT 
‘fei 
Please place my advert in YOUR COMMODORE for issues 


Please indicate no. of insertions required, 


THE ENEMYS CRACK ELITE 
PORES SHIT UP OLR FRONT LNE, 


fic 
sh 


THE ENEM)| 
WP Ne 


ine D eu rd 

mission to free lost compatriots held prisoner by the 

armies of death, the forces of oppression, Only the bgt Send for full colour product brochure 
‘earless dare take up a challenge where courage and maton 

ndurance are as essential as intelligence and skill A } 

Compulsive, Action packed. Step forward. modern day 

hero. you'll never know how good you really are until 

You've tested yourself on the ultimate mission 


IAlso Available AMSTRAD - Bi 
Coming Soon SPECTRUM 48K 


Alligata Software Ltd., 1 Orange Street, 
Available at all good software dealers. Sheffield S1 4DW. Tel: (0742) 755796 


Choosing the right computer 
is a good start — but can you 
find the right software? 


‘At SUPERSOFT we're very conscious of the 
fact that people who spend several hundred 
pounds on computer equipment are looking 
‘to do rather more than play Space Invaders. 

Financial planning is a rather grand name 
for something you’ ve been doing all your life 
— making ends meet! Perhaps if Mr 
Micawber had used BUSICALC he would 
have been able to balance the books a little 
better. 

For home, club or small business use 
BUSICALC 1 should pay for itself in no time at 
all; for larger companies we recommend 
BUSICALC 3, one of the few really valuable 
programs that you can learn to use in a day. 

Although your Commodore 64 is a power 
ful musical instrument you need to be a 
pretty good programmer to understand how 
it all works. Unless, of course, you buy MUSIC 
MASTER! 

To use MUSIC MASTER requires no prior 
musical knowledge, though in the hands of 
an experienced musician it will prove an 
invaluable tool. You don’t need to know the 
first thing about programming either! MUSIC 
MASTER is the musical equivalent of a word 
processor, remembering the notes you play 
and allowing you to replay and edit them as 
you wish 


INTERDICTOR PILOT is 2 space flight 
simulator. Nowadays simulators are widely 
used to train pilots and astronauts because ~ 
to be frank ~ it's a lot cheaper (and safer) 
than the real thing! 

Imagine, if you will, life in the 22nd 
century: space travel is commonplace, and 
on the outskirts of the galaxy the first war 
between civilizations is being fought. A short 
age of trained pilots has prompted the Feder. 
ation to develop a computer simulation that 
allows raw recruits to gain experience with- 
out paying for their mistakes with their lives. 
With the aid of your Commodore 64 you too 
can learn to pilot the Interdictor Mk 3 craft. 
But be warned — this is no game! 


‘SUPERSOFT, Winchester House, Canning Road, 
‘Wealdstone, Harrow, Middlesex HA3 75) 
Telephone: 01-861 1166 


Other SUPERSOFT products include the 
MIKRO ASSEMBLER cartridge, the only 
assembler that's ideal for beginners yet pow: 
erful enough for the professional (most of 
our competitors use it!), The VICTREE cart- 
ridge adds dozens of commands to Basic 
including toolkit aids and disk commands; or 
on disk there's MASTER 64, a really com- 
prehensive package for the keen prog- 
rammer. 


if course, we do also publish games 


programs, and with classics like STIX, QUINX 
and KAML-KAZE in our range we are one of 
the market leaders. But we most enjoy 
coming up with the sort of programs that are 
going to be in use for months and years, not 
hours and days — the sort of programs that 
make you glad that you boughta computer — 
and glad that you bought SUPERSOFT! 


You won't find SUPERSOFT products on 
the shelves of your local supermarket. But 
most specialist shops stock titles from our 
extensive range (and are prepared to obtain 
other programs to order). However you can 
also buy direct by sending a cheque (pre-paid 
orders are post free!), by calling at our 
offices, or over the telephone using your 
ACCESS card. 


